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ABSTRACT 


om = ean carmohess cI priest sTMaT Fact Rope 


READ WRTTTEN RELIABLY (WORST CASE 
NOTSE. TESTS). yg tye IS AVAILABLE 
ALL TESTING 15. ORMED WITH MEMORY MANAGE 
ENABLED, (UNLESS DISABLED). 


THIS PROGRAM MAY BE USED TO ADJUST/MARGIN MEMORY. 
ALSO INCLUDED IS A TOGGLE IN ADDRESS TEST. 


FLSO INCLUDED IS THE BRANCH GOBBLE MOS TEST. NOTE 
YO ald SECTIONS 9.1 THROUGH 9.4 APPLY TO BRANCH 


> 


THE PROGRAM COGAB HAS BEEN CREATED BY MODIFYING THE 
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OZQMB PROGRAM. THE DZQMB PROGRAM IS AO - 124K 
MEMORY EXERCISER. BUT THE SEDM on HAS MUCH ee 
NO MOS MEMORY AND NO MEMORY aN TION. 


MEMORY AND 
Sh oe 


PL RA CODES 
A SEDM SYSTEM. 
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CHAPTER 1 
REQUIREMENTS 


1.1 EQUIPMENT 
THE PDP-11 FAMILY PROCESSOR WITH 8K MEMORY. 


OPTIONAL... 
KT11-C OR KT11-D MEMORY MANAGEMENT OPTION OR MF11 PARITY OPTION. 


1.2 STORAGE 
PROGRAM STORAGE - THE PROGRAM USES MEMORY 0-17777. 


1.3 PRELIMINARY PROGRAMS 


IPDP-1: FAMILY INSTRUCTION EXERCISER (DCQKC OR DZQKC) KTI1-C/KTL1-0 
LOGIC TESTS. 
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CHAPTER @e 
LOADING AND STARTING PROCEDURE 


LOAD PROGRAM INTO MEMORY USING ABS LOADER. 


LOAD ADDRESS 200 

SET Sle IN DESIRED POSITION (SEE CHAPTER 3). 
SET SWiS=1 OR UP---IF NO TTY WITH THE SYSTEM 
PRESS START. 


THERE WILL BE AS ON THE DISPLAY LIGHTS FOR A 
FEW SECONDS AFTER EACH PASS. THEN PROGRAM WILL HALT 
AT LOCATION 252. IF SW WAS UP. 

IF PROGRAM HALTS AT 2S2, PRESS CONTINUE. 


ASTERISK “*” WILL BE PRINTED AFTER EACH PASS. 
“DZQMB DONE!” WILL BE PRINTED AFTER 8 PASSES. 


PASS COUNT MAY BE MONITORED IN THE DISPLAY REGISTER (11/45) OR 
LOCATION 756. 


NOTE 


THIS PROGRAM SAVES THE L BOOT AND 
ABS. TO RESTORE THE LOADERS, RESTART AT 
162. BEFORE RESTARTING INSURE THAT T 

PROGRAM I T OCATED. 


PR : STA PROGRAM AT + 
12354. WHERE * = BITS 13-15 OF THE PC. 
THE PROGRAN WILL RELOCATE BACK TO O-4K 
AND AT 176. PRESS CONTINUE TO 

RESUME FESTING. 
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2.1 ACT11 OPERATION 


IF THE PROGRAM IS RUN IN QUICK VERIFY MODE UNDER ACT11 THE PROGRAM IS 
DONE AFTER THE FIRST PASS. ALSO THE PROGRAM DOES NOT RELOCATE TO TEST 
THE LOWER 4K OF MEMORY. 


_ TEST DDGAB-A O-124K MEMORY EXERCISER MACY11 27(732) 10-SEP-76 10:35 PAGE 9 
_ DDGABA P1l 


POP-11 O-124K MEMORY EXERCISER PAGE 8 
SWITCH SETTINGS 


CHAPTER 3 
SWITCH SETTINGS 


SWiS=i OR UP HALT ON ERROR AT LOC. i430 
SWi4=1 OR UP LOOP SUBTEST 
SW13=1 OR UP INHIBIT ERROR TYPEOUT 
SWi2=1 OR UP INHIBIT USE OF MEMORY MANAGEMENT 
NOTE 
INHIBITING THE USE OF MENT 
CAN BE DONE ONLY WEN THE PROGRAM IS 
STARTED. IF tar < OF 
MANAGEMENT IS INHIB oY SS 
BY THE ONLY 


AS TYPED 
REFLECT THE AMOUNT OF MEMORY TO 28K 
(LAST ADDRESS = 160000). 


SWil=1 OR UP INHIBIT SUBTEST ITERATION 
SW10=1 OR UP RING BELL ON ERROR 
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PAGE 9 


(INITIAL 


SW9=1 OR UP DISPLAY ERROR COUNT IN DISPLAY REGISTER 
SW9=0 OR DOWN DISPLAY PASS COUNT IN DISPLAY REGISTER 
SW8=1 OR UP HALT PROGRAM UNRELOCATED AND RESTORE LOADERS 
SWo=1 OR UP HALT ON END OF PASS 
SWS=1 OR UP INHIBIT PARITY ERROR DETECTION 
SWizl OR UP THERE IS NO TTY WITH THE SYSTEM:SO PATCH TAGS 
STARTUP ONLY) 
NOTE 
WITH PARITY ERROR DETECTION ENABLED, A 
MEMORY FAILURE WILL CAUSE A PARITY 
ERROR. ERROR PRINTOUT ON A PARITY 
ERROR DOES NOT TYPE THE GOOD DATA. 
THUS, A BIT DROP OR PICKUP WILL NOT BE 
TYPED SUCH. IT IS BEST TO RUN THE 
FOR | PASS (UNTIL AN * IS TYPED) 
WITH PARITY DISABLED, THEN RESTART THE 
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CHAPTER 4 
SUBROUTINE ABSTRACTS 


4.1 SCOPE 


THE PROGRAM STORES IN Ri THE PC_OF THE LAST TEST SUCCESSFULLY EXECUTED 
AND MAY BE USED AS AN AID IN DEBUGGING IF THE PROGRAM ’BOMBS’ BECAUSE 
OF A HARDWARE FAILURE. 
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CHAPTER 5 
ERRORS 


THESE TESTS PRINT OUT THE PC WHERE THE ERROR WAS DETECTED, THE FAILING 
ADDRESS, THE GOOD DATA, AND THE BAD DATA I.E. 


PC=XXXXXX ADDRESS AAAAAA GOOD DATA GGGGGG BAD DATA BBBBBB 
THE ADDRESS OF THE FAILING LOCATION IS THE TRUE 18 BIT PHYSICAL 
IF SW1S WAS UP, PROGRAM WILL HALT AT LOC. 1430 ON ERROR. 


NOTE 


WHEN TESTING MEMORY LOCATIONS 0-17776 
THE PC TYPED WILL BE A MULTIPLE OF 20000 
wits THAN REFLECTED IN THE 


THE FAILING ADDRESS (PC + 2) IS IN RI 

THE ADDRESS OF THE BAD DATA IS IN (Re) -e 
THE GOOD DATA IN RO 

THE BAD DATA IN R3 


THE ADDRESS OF GOOD DATA IS_IN R4¥ (RANDOM DATA TEST ONLY). WHEN 
ERROR IS DETECTED WHEN EXERCISING THE MEMORY USING THE WORST case 
NOISE PATTERNS, THE USER SHOULD RESTART THE PROGRAM SELECTING PROGRAM 
(SEE CHAPTER 8 FOR DETAILS) SELECTING THE APPROPRIATE PARAMETERS. THE 
UeER CAN USE THE PC AND ADDRESS OF THE FAILURE TO SELECT THE PROPER 
CORE BANK(S) AFFECTED AND ALSO THE SPECIFIC PATTERN. THIS ALLOWS 
MAXIMUM SCOPE CAPABILITIES. 


os ~ -_— 


—————— ee ee er 


ee ee ee ee ee ee ae eee owe << oe 


———— + 
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6.1 PARITY ERROR 
IF THE MEMORY PARITY OPTIONS ARE INSTALLED THE PROGRAM RUNS WITH THE 
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ACTION vet" SET (BIT 0). IF A PARITY ERROR IS DETECTED THE 
PROGRAM WILL : 


PARITY ERROR 
AND SCAN MEMORY FOR (ES) ING THE PARITY ERROR(S). WHEN 
SHE BARITY ERROR’ 15 DETECTED AN ERROR WILL BE TYPED AS Low: 
PC=XXXXXX ADORESS ARRAAA BAD DATA BEBSBE 
2 ee OR_RESTART TO STING. IF A PARITY ERROR IS NOT 


PARITY ERROR NOT FOUND ON SCAN 
PC=XXXXXX ADDRESS=AAARAA 


ARARAR=PC AT TIME PARITY ERROR WAS DETECTED. 


NOTE 
PARITY IS DISABLED WHEN THE PROGRAM IS 
RELOCATED. 


o--- 


- - = 
oe -_— *———w << ee ee rr _— 
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CHAPTER §& 
RESTRICTIONS 


7.1 STARTING RESTRICTION 


gS cae IS RELOCATED, DONOT RESTART AT ADDRESS 200 


7.2 OPERATIONAL RESTRICTION 


PROGRAM CHECKS CONTIGUOUS MEMORY. IF a Ni ERROR TRAP OCCURS 
THE PROGRAM IS RELOCATED PROGRAM UNDEFINED. IF paRiTY 


FCO ORE OEP 15,? HE “lisa nee HOS 


v. 
RUNNING IN MOS MEMORY OR RELOCATED 


e 


—— 
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CHAPTER 7 
MISCELLANEOUS 


ZINTERRUPT VECTOR AREA (0-1000) 
SS WHERE THE 
SEE ALSO 


THE POP11/4S WILL DISPLAY THE TRAP 
a ADDRESS+4 IN THE ADDRESS LIGHTS. 


£2 


A TRAP TO 
DTSPt AY 10 IN THE ADDRESS LIGHTS. 


7.1 STACK POINTER 
He STACK POINTER IS INITIALLY SET TO SOO. AND IS RESET TO THIS VALUE 
AT THE START OF EACH SUBTEST. 


7.2 PASS COUNT 
PASSES ARE REQUIRED I TH WHICH 

EY bh ee a PRINTED. PLE TION OF ce ABunT MAY Be GE OBSERVED BY 

TURNING THE SWITCH TO THE DISPLAY POSITION. (THE PASS COUNT 

STORED IN LOCATION 1000.) THE PASS COUNT SHOULD Be MONTTORED IN 7 

STORED aA THe Concmcnt nTERS OH IMDERTIOD LOOP NGTE TAT BIT ic OF 

REGISTER 15 NOT PART OF THE BASS COUNT. BIT 15, IF OM, 


THE DISPLAY 
INDICATES THAT THE PROGRAM IS IN ITS RELOCATED CYCLE. 


. 
db 
oF 


7.3 ERROR COUNT 
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ar "hn ee OBSERVED. By "Tuanine Tee sur fey 10 Toe Fee ay Bostii 
ee >ROGRAN rea ae ERRORS; - Te ERROR CUNT i 


INCREMENTED PAST THAT BIT is THE DISPLAY 
REGISTER, IS NOT PART OF THE ERROR COUNT. BIT 15, iF ON, INDICATES 
THE PROGRAM IS IN ITS RELSCATED CYCLE. 


7.4 DISPLAY REGISTER 
Be Re THE, COUNT COUNT OF oe 


208 we ee 
SHRCS aftis ane’ of ihe 

"ag feu re errtee YEE’ page chon of THE 
ERROR COUNT. WHEN BIT 1S PROGRAM IS PERFORMING A RELOCATED 
CYCLE att PROGRAN iS RELOCATED. THE SPECIAL REST er PROCEDURES 





7.5 PROGRAM RELOCATION 


WHEN THE PROGRAM IS we tad aes x x IS MADE THAT THE PROGRAM 
HAS BEEN RELOCATED CORRECTL PROGRAM CANNOT BE RELOCATED 


Fee sc SAE TE bene Bi No REREA a a t  sk 


TES 


SONAR FEL REL OCA LON. CATION. OOMMIARO RE RELOCATION WILL BE ATTEMPTED UNTIL IT 


7.6 POWER FAIL 


THE PROGRAM MAY BE POWER FAILED WHEN RUNNING. WHEN THE POWER RETURNS 
THE PROGRAM WILL CONTINUE IN SEQUENCE. 





CAUTION 


PROGRAM ACTION IS UNDEFINED IF _ THE 
PROGRAM IS RELOCATED OR IN MOS MEMORY. 


DO_ NOT TURN POWER OFF/ON art THE 


MESSAGE ‘POWER FAILED’ HAS BEEN TYPED. 
THIS IS BECAUSE THE STACK MAY OVERFLOW. 


7.7 EXECUTION TIME 
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EXECUTION TIME IS DEPENDENT ON TYPE OF PROCESSER, TYPE OF MEMORY, AND 
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MISCELLANEOUS 
AMOUNT OF MEMORY. SOME REPRESENTATIVE TIMES (PER PASS) ARE: 


11/05 WITH 28K MEMORY - 1 MIN. 
11/45 WITH 96K MEMORY - 3 MIN. 
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CHAPTER 8 
PROGRAM DESCRIPTION 






TION $2 
sg ma: 


ae re 
ETE 1st y 






erie t 


QUENT RELOCATION. I.E., FIR 


aoe Seer 
Sa opine Se 
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8.1 PROGRAM 2 (USER SELECTIONS) 


me eee ew ——- . 
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THIS PROGRAM IS PROVIDED TO ALLOW THE USER TO SPECIFY CERTAIN TEST 
PARAMETERS AS SHOWN BELOW: 


: ie en [sratee ty FOR TES | eatin 


RN TO BE 


NOTE 
ALL INPUTS ARE IN OCTAL. 


BeRat ; oe 


- LOAD SS 214 
bee ipisT CUP)—--ONLY IF THERE IS NO TTY 
3. PRESS START 


IF SWO1 WAS UP I.E.,IF THERE IS NO TTY,PROGRAM 
WILL HALT AT LOC. Sle. 
te S0,PATCH THE FOLLOWING TAGS: (REFER TO 8.1.2) 


.PARIT --- WITH O (DISABLE PARITY) OR 1 (ENABLE ga ) 
.STBANK --- WITH O OR 1 OR 2 ETC (STARTING BANK 8 
-BANKS ----_WITH 1 IF THERE TS 8K OR LESS OF MEMORY 
.PAT --- WITH PATTERN & 


4. PRESS CONTINUE (IF PROGRAM HAD HALTED BECAUSE 
OF SWO1 BEING UP) 


8.1.2 PROGRAM 2 USER PARAMETERS 


1. ENABLE PARITY? 1/0 = YES/NO. TYPE (OR PATCH nas HOY 1 TO ENABLE INTERRUPT ON 


PARITY ERROR. TYPE (OR PATCH) O TO DISABLE INT 


2. STARTING BANK #(8)? TYPE (OR PATCH .STBANK) THE 4K BANK WHERE YOU WISH TO BEGIN 


ESTING. 
TYPE TO START AT TYPE TO START AT 
(OR PATCH) 
0 
1 020000 20 
e 040000 el 420000 
3 060000 ee 440000 
4 00000 e3 460000 
S 120000 24 500090 
6 140000 es 520000 
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7 160000 26 
10 7 
i eg 
le 31 
13 260000 3e 
is 320000 3 
te 390000 35 
17 360000 36 740000 
NOTE 
TYPE ONLY NUMBERS SHOWN!!! 
2. INUMBER OF 4K BANKS TO TEST (8)? TYPE (OR PATCH .BANKS) IN OCTAL THE NUMBER OF 
4K BANKS TO TEST. 
4. PATTERN #? 
YPE TO SELECT 


T 
(OR PATCH? 
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0 1 XOR 8 TEST PATTERN 
1 3 XOR 9 T st PATTERN 
2 8 xX 13, T PATTERN 
3 USER CONSTANT 
y ROTATING 0 
S ROTATING 1 
5 3 XOR 9 PARITY PATTERN 
? 0,1,2,4,5 ABOVE 
NOTE 
PROGRAM WILL NOT ALLOW AN ODD NUMBER OF 
4K BANKS TO BE TESTED IF PATTERN 2 OR 7 


TYPE A & DIGIT OCTAL NUMBER, TO ENTER A 
NEW CONSTANT TYPE °A’ AND WAI FOR 


AN 
THE PROGRAM TO RESPOND. THE STARTI 
ADDRESS IS e214. 


8.1.3 RESTARTING : 

IF YOU SELECTED BANK O TO START, RESTART AT 32460 
THEN AT 214. OTHERWISE, YOU WILL HAVE 
TO START SY RELOADING ABS. LOADER + 


8.1.4 PROGRAM 2 USE 


PROGRAM 
PROGRAM 2 CAN BE EFFECTIVELY USED TO MAKE PROPER ADJUSTMENTS TO A 
SPECIFIC MEMORY BANK AND ALSO TO ’MARGIN’ MEMORY. 


THE PROGRAM IS NOT RUNNING IN THE MEMORY BANK(S) BEING 
ADJUSTED/MARGINED. THUS = ALL O-12e4%K MAY BE 
ADJUSTED/MARGINED. PARITY es i593 DESELEC WHEN MAKING ANY 
ADJUSTMENTS PARTICULARLY WHEN TESTING THE FIRST 4K BANK(S). 


8.2 PROGRAM 3 
THIS PROGRAM IS THE SAME AS PROGRAM 2 WITH THE FOLLOWING EXCEPTIONS: 


1. INSTEAD OF NUMBER OF 4K BANKS TO TEST, TYPE NUMBER OF 
2S6(DECIMAL),YOO(OCTAL) WORD BLOCKS TO TEST. 


2. DO NOT SELECT PATTERN 2 OR 7. 
THE STARTING ADDRESS IS 2e0. 
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PROGRAM 4 CAN BE USED TO WRITE/READ USER DEFINED DATA INTO ANY SINGLE 
ADDRESS. THE PROGRAM WRITES THE DATA AND CHECKS IT. 


at eRReENE cOntay FP TR UPEEA*EPERTS FRE "beBGhAN” Rice tyPe THE 
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pill OF erent ADDRESSES UNTIL EITHER SWITCH 0 = 0 OR A NEW 


TO JU A NEW ADDRESS AND CONSTANT TYPE AN ’A’ AND WAIT FOR THE 
PROGRAM TO RESPOND. 


THE STARTING ADDRESS IS 224. 


a Ae SRT Ma ce 
Siang wi Re amen Lint ao covisiuine Ye Te leren 


"Tee 
CORRECT CONTENTS STARTING b WITH THE UPPER LIMIT AND CONT oD FOR TO THE 
LOWER LIMIT. 





LOCATION CONTENTS MNEMONIC COMMENT 

10 0 MOV 8SO, :GET FIRST 
ee: . oo 

ig neo? 1S: CHP RO ESR fo 

5 : | z NIT 

34 biai6 Rov Ag, RO) : us 

2s TST (RU)+ : 

20 000772 BR 1 . 

cr 010004 2$: MOV RO,RY H 

34 020001 3s: Rl . 
* 3 001767 1 ; 

40 024000 -(RO),RO ; 

42 001774 BEG 

oa OGO000 HALT . 

46 000772 BR 3$ 





AFTER TOGGLING THE PROGRAM LA=10 ##SET UPPER LIMIT##, START. 


NOTE 
THE UPPER LIMIT ADDRESS nay BEC non 


THE SWITCH REGIS 
SUR SPERATION.  ~ HOMEVE 
MAY HALT 


OCCASIONALLY THE 

BECAUSE OF ’SWITCH BOUNCE’. THE BEST 
PROCEDURE WHEN CHANGING LIMITS IS 10 
STOP THE PROGRAM MAKE THE CHANGE AND 
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— EEE ee ee * 


—-——— —— re rrr err ae 
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CONTINUE.) THE LOWER LI 


MIT ADDRESS (le) 
MAY BE PATCHED TO ANY DEST 


RED ADDRESS. 
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8.5 PROGRAM 6 


SP elE PRE I OOTY HA HT Sef 
ioe ie Wa eaal One TET RY Hates OP aba 


ARTING Pn 4 | 
r OuER OnTT Is GeetreD Fo — oo Oo TOGGLE i 
FOLLOWING PATCHES TO PROGRAM 


LOCATION CONTENTS MNEMONIC COMMENT 


le LIMIT 


3 CK I oh 


ne: 











3 2 php 








ss 


& 
BaGoe amass 


- GODMAeh Fe 


, (R2)+ : CHECK 
* BRANCH 


OPC EE UOe Lhe 
8 aces BeR 
Sess Bee. 


ae 


; ERROR 
;GO CHECK NEXT ADDRESS 
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CHAPTER 9 
BRANCH GOBBLE MOS TEST 


$.1 ABSTRACT 


Scafions ae T PROGRAM IS USED TO TEST MOS MEMORY. CONTIGUOUS 
BeAr! TESTED BETWEEN TWO LIMITS IN A MINIMUM BK, MAXIMUM 124K 
MEMORY MACHINE. IF PARITY IS AVAILABLE IT IS ENABLED. 


9.2 OPERATING PROCEDURE 


1. LOADING: Loe DZQMBG PROGRAM INTO MEMORY USING THE 
ABSOLUTE L , 


STARTING: LOAD ADDRESS 270 AND PRESS THE START BUTTON. 

THE PROGRAM WILL FIRST IDENTIFY ITSELF ON TTY: 
BRANCH GOBBLE 

4. THEN THE ABSOLUTE LOADER WILL BE SAVED. 

S. & CHECK WILL BE MADE FOR PARITY REGISTERS. IF NONE ARE FOUND 
THE MESSAGE : 


tj fw 


NO PARITY 


WILL BE TYPED TO THE USER. IF PARITY IS FOUND IT IS TURNED 
ON, AND THE MESSAGE, 


PARITY ENABLED 


WILL BE TYPED TO THE USER. THIS WILL BE FOLLOWED BY A LIST 
cece. UNIBUS ADDRESSES OF THE PARITY REGISTERS FOUND AND 
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ODGABAR. PLL 


&$. THE USER WILL THEN BE ASKED IF HE WANTS THE PENDING TEST TO 
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™ 


BE RUN USING MEMORY MANAGEMENT. 

USE KT11? (Y OR N) 
IF THE USER TYPES Y THEN MEMORY MANAGEMENT WILL BE USED 
DURING THE PENDING TEST. TF HE TYPES N. THEN MEMORY 
MANAGEMENT WILL NOT BE USED. TYPING ANYTHING ELSE OTHER THAN 
Y OR N WILL CAUSE THE OUEE TION. TO BE REPEATED 


Mi We WILL THEN BE ASKED TO GIVE THE LIMITS OF THE TEST 
Gn LIMIT? 


AND: 
LOW LIMIT? 


RESTRICTIONS ON THE USER’S RESPONSE ARE: 


A. THE NUMBERS MUST BE VALID (16-BIT) O6-DIGIT OCTAL 
ADDRESSES, REAL NOT VIRTUAL. 


THE NUMBERS SHOULD BE MULTIPLES OF 100 (OCTAL). 
THE HIGH LIMIT MUST BE GREATER THAN THE LOW LIMIT. 


OD. IF MEMORY +e sr? NOT USED, HIGH LIMIT MUST BE LESS 
THAN OR EQUAL ; 


E. HIGH LIMIT CAN BE 1 + THE HIGHEST REAL CORE ADDRESS. FOR 
EXAMPLE, IN AN 8K MACHINE, HIGH LIMIT CAN EQUAL 40000. 


VATS TO THESE RESTRICTIONS WILL BE DEALT WITH IN THIS 


&. & QUESTION MARK AND THE PROMPT WILL BE ISSUED: 
? 


, 


THE USER IS THEN <hoie TO INPUT THAT LIMIT AGAIN; 
THIS TIME CORRECTL 


6. WHAT EVER THE LAST TWO OCTAL DIGITS OF THE NUMBER WHICH 
THE USER TYPED THEY WILL BE ASSEMBLED AS ZEROES. 


C. THE USER WILL BE ASKED FOR OTHER LIMITS BY REPEATING THIS 
STEP (7). BEFORE STEP (7) IS REPEATED 
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we VRE. 


NOT VALIO! 
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POP-11 O-124K MEMORY EXERCISER PAGE 24 
BRANCH GOBBLE MOS TEST 
WILL BE TYPED. 
D. SAME AS 3. 
g. THE TE TEST STARTS. THE TEST WILL LOOP 1 NOEF INITELY BETWEEN THe 
ENCOUNTERED. UME et she FbER At ThE BEGINNING BEY cAce 
9. TO STOP THE TEST RUNNING AND START ANOTHER HIT THE HALT 
SWITCH AND RETURN STEP 2. ANY TEST BUT THE FIRST WILL NOT 
INCLUDE STEP 4. 
10. TO STOP THE TEST AND RESTORE THE LOADER, HIT THE HALT SWITCH 
LOAD ADDRESS 162 AND START. WHEN THE LOADER IS SPS TORED THE 
PROGRAM WILL HALT AT LOCATION 200. 
11. TO STOP THE TEST AND START THE O-124K MEMORY TEST HIT THE 
HALT SWITCH, LOAD ADDRESS 200, AND START. 
12. D DATA LIG LIGHTS. no Se DATA LIGHTS WILL DISPLAY 
Hoe MERORY FAILURE BceuRS THESE L ti Rey GOR TEST rk, 
Me-BTT ADDRESS SRE NER” THE 
3.32 ERRORS 


hb. 


c. 


ERRORS IN OPERATING THE PROGRAM ARE DESCRIBED IN OPERATING 
PROCEDURE 9.e. 


IF A PARITY ERROR IS DETECTED THE USER IS TOLD THE PC+e AT 
THET IME OF THE ERROR: 


PARITY ERROR 
PC=XXXXXX 

AE Ge AE EAU HEP POS re lbace 
SCAN COMPLETE 


IS TYPED AND THE TEST IS RESTARTED. 
IF THE ERROR IS DETECTED ON THE SCAN THEN THE USER IS GIVEN 
THE ADDRESS OF THE LOCATION CAUSING THE PARITY ERROR AND THE 
CONTENTS OF THAT LOCATION: 

XXXXXX HAD BAD DATA XXXXXX 


IF MEMORY MANAGEMENT WAS OFF DURING THE SCAN FOR THE ERROR 


Me O-124k MEMORY EXERCISER MACY11 271732) 10-SEP-76 10:35 PAGE 35 


THE ADDRESS GIVEN FOR THE ERRCR IS REAL AND: 


ee ee ae ee ee ere ——— ee | ee 
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_ DOGABA.P11 


e-em ee od oo eee ew ee 


=i Oe MEMORY EXERCISER PAGE eS 
BRANCH Base MOS TEST 


KT11 OFF 
IS TYPED. 
IF MEMORY MANAGEMENT WAS ON DURING THE SCAN: 
KT11 ON PAR=XXXXXX 
AM IE Bi RO a 
THIS TS RELOCATION IS Nis GIVEN IN THE NOTE BELOW 
PETER oy ag RAG co AND THE USER NOTIFIED, THE 


ore yt 


IN MOS 
oF eure I 
et 
ia asia rte oe OF 3 


Teen ADDRESS 
THE DATA IF Gite 1 IN THE MOE REINER TR SCRIBED Slee NOTE BELOW. 


NOTE 
ie SOE ST HOTEL 
ee I S OF THE VIR 
SHIFTED, 6 BITS " THE ie Aaaied 
VIRTUAL ADDRESS = 0 OOX XXX XXX XXX XXX 
PAR = YYY YYY YYY YYY 000 000 
papper esa in ogggaanigentoel 
TO ae oe PAR TO 


THAT ON_KERNEL I 
Sin “ioe re is 
DESIGNATE a 


INSTANCE 
ote ae 
BITS Ube ki VIRTUAL "ihe l=] 


IF_AN eR gd MAR ght SPR IN ci ben SS -. PARITY ERROR OR 


NOT . cave PROGRAM HALT T IS CLEAR ‘i 
LeedROTTs ft Shite TE Seely es Hoe 


EXAMINE THE CONTENTS OF OF THE MEMORY LOCATIONS STARTING AT THE 


—E —_———— — 
eed — = 
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ADDRESS IN THE DISPLAY REGISTER. _ THE CONTENTS THES 
LOCATIONS SHOULD BE COMPARED 6 THE CONTENTS ai "he 
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POP-11 O-124K MEMORY EXERCISER PAGE 26 
BRANCH GOBBLE MOS TEST 


HEL ite, ck WOE AAR PRB aH lat 


THIS WAY Mie Perc aes 
TO DETERMINE WHICH ets" WERE LOST IN WHAT 


9.4 PROGRAM DESCRIPTION 

THIS VERSION OF THE ait GOBBLE TEST IS contae T opie RAL BRANCH FROM 

THE DZQKA-A_INS bot HERE Is a et a 

aaa WHAT HAS Is T oie THAT ST an 

DONE IN A WAY WHICH ALLOWS THE ree er TO RU RUN Ras tT BID IH TS MORTCTNAL 
DATA IS T AND IF 


FORM. COLLECTED FROM 
NEEDED IT IS SET UP AND THAT TEST IS ALLOWED TO RUN BETWEEN THE 
DESIGNATED LIMITS. 
197 
198 -NLIST MD,MC 
19S -LIST ME 
ABS 
-MCALL STYPE 


-TITLE TEST ig O-124K MEMORY EXERCISER 
oTAR ARTING INST & DEFINITIONS 
;COPYRIGHT 1 apo EQUI CORP., MAYNARD, MASS. 


s THIS TEST CHECKS THA MEMORY Ff ES ARE UNIQUE USING ADDRESS TESTS 
AND CHECKS Ta RELA ILITY OF MEMORY USING NG WORST CASE NOISE TEST PATTERNS 
a A RENOON CODE RELOCATED), A ROTATING 0 AND ROTATING 


BENE RISS 







— b— b= b> bb P= bb bm bb = 0s 0 0 bb bP be 


216 AL SO INCLUDED ARE USER TESTS WHICH CAN BE USED TO TEST SPECIFIED SEG- 
211 2 nD USING THE PATTERNS TIONED ABOVE. ADDITIONALLY A 

212 T IN I (SEC 9.5 OF THE DOCUMENT) WHICH 
13 is ING MALFUNCTION IS SUSPECTED INVOLVING THE FIRST 
215 “A MOS TEST HAS BRANCH GOBBLE ROUTINE. 

216 : THE MAY GE ete RUNNING. THE PROGRAM WILL PRINT 

217 “A MESSEUE ( FAI SAND CONTI IN SEQUENCE WHEN THE POWER COMES 
218 “BACK UP. ION## NOT-POWER FAIL THE PROGRAM T IF THE PROGRAM IS IN 
1213 -MOS MEMORY OR IF THE PROGRAM IS RELOCATED. 

1221 ‘LOADING AND STARING INSTRUCTIONS 

1555 : LOAD AOE GRAM Sail RUN HORST TEST PATTERNS IN LOWEST 4K 

1224 “THUS THE PROGRAM CANNOT HORE STARTED AT 200 IF RELOCATED. TO PREVENT 

1225 ; RELOCAT ION FROM OCCURING DEPOSIT 200 INTO LOCATION 42 (NOT NECESSARY 

1226 ‘IF LOADED VIA ACTI1). THIS ACTION WILL PREVENT RELOCATION AND ALSO 

1227 i INHIBIT TESTING MEMORY IN 


L 
1228 ‘THIS PROGRAM ALSO RELOCATES THE ABS AND BOOT LOADERS TO ALLOW TESTING 


| 
| 
| 
| 


! 
f 
| 
' 
' 
' 
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0001 


Wiemee Gee 


177776 


MACY11 27(732) 10-SEP-76 10:35 PAGE 39 
STARTING INST 8 DEFINITIONS 


;OF MEMORY, TO RESTORE THE eOBDERS RESTART AT 162. 
STAC CK POINTER IS S 


: THE’ BROGRAN 


re its be BATRBGOMASRREET?OS OeeBRP HPS. 0 


;GENERAL REGISTER ASSIGNMENTS 


RE 
; VECTOR po Tsar 


C=10 

TBITVEC=14 

TRTIVEC=14 
BPTVEC=14 

IOTVEC=20 


MMVEC=250 


;REGISTER ADDRESSES 
PSW=177776 


KERNEL MODE 
‘PREVIOUS SUPERVISORY NODE 
‘PREVIOUS USER MODE 
‘SELECT RIO-RIS 


ODO RESe OF RECERVED  INGT. TRAP VECTOR 


; IOT TRAP VEC 

ADORE OF POWER FAIL TRAP VECTOR 

i Ane e adh A 

Opies & 1 See TERRE SE 
; oF Ty abl INTERRUPT VECTOR 
ADDRESS OF 


;ADDRESS OF FLOATING "ROINT INT. VECTOR 
“ADDRESS OF MEM MGMT ERROR TRAP VECTOR 


“ADDRESS OF STATUS REGISTER 


ee ee 








' TEST DDQRB-A 0-124K MEMORY EXERCISER MACY11 27(732) 10-SEP-76 10:35 PAGE 40 
 DOGABA.P11 STARTING INST 8 DEFINITIONS 
1285S 177774 2177774 
1286 177772 gee 
1287 eee AK= 
: : ze 
1280 teed 1a oeeG 
12931 177565 1 
les2 177570 =] 
ica 177570 DISPLAY=177570 
less -INITIAL STACK POINTER SETTING 
ice 000500 STKPTR=S00 
ica -MI 7 BIT ASSIGNMENTS 
1503 ByO000 itive 
| @ q 
1305 Bat 
1304 000400 BITs= 
1305 000100 BIT6= 100 
1306 
1 000001 
1 
1309 000100 
1310 - MEMORY REGISTER ADDRESS ASSIGNMENTS 
ETE : ; ROORESS OF MEM MGMT nT, 
1313 FEE ; 4 se . “ SRe 
igi? 172516 -ADDRESS OF MEM MGMT REGISTER SR3 
1316 172300 4 1 sADDRESS OF KERNEL °I° PAGE 
1317 172302 K =] -DESCRIPTOR REGISTERS 
1318 172304 K | 
1319 172306 4 ] 
1320 172310 K 17231 
1321 172312 aa 1723le 
l3de 172314 ot 172314 
1353 172316 K =172316 
1325 172340 tf ed LS *ADDRESSES OD KERNEL °I* SPACE 
1326 172342 KIPARI=1 r4 -PAGE ADRESS REGISTERS 
1327 172344 Monae 
1328 172346 i 1 
1363 1 KIPARY=1 
l l KIPARS=1 
1331 172354 Moret Site 
1332 172356 KIPAR7=1 
1333 
1334 
1335 - INSTRUCTION EQUATES 
1326 104400 HL T=T 
is 104060 SCOPE=EMT -SCOPE IS AN EMT TRAP 
i 
1322 -MISC. EQUATES . 
1346 O0000E RW=6 -R/W BIT IN POR REGISTERS 


EE TS 
ees 
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000000 =0 ;UP BIT IN POR REGISTERS 


TSE LemEoRS | 


RD 


; SPECIAL hl CATCHER IF PRO- 
;GRAM HALTS AT O THEN ADORESS WAS NOT 
;LOADED PROPERLY FROM VECTOR. 


: a 


LOGICAL 
BIT14 


Dg 
AS ED SE OnE pRST FOUR coe INTO 
10H ite Hitt Po 
° : ny Rd ve * q fre ser INE WILL NOT 
3 hes ORESS, NOTE TST 1 Me ey 
A ORer one 8 rs ape TEST, IF IT 1 oS BEEN 
bio PROGR OF EXREPy 

TS 

ra 1$ 


‘BE 
“WORD 
“WORD 
‘e. 
“WORD 
“ORO 


PRR aa dae nate 


| eel eee 


33933 





Se oo nd 
tate 










eer al WAS TAKEN FROM DDQAB 





15 ALL 


005737 000120 WHERE : 


BRAVES TERRE 


000124 

000130 10040: 
000132 TS PC 

600i3s4 0116587 017762 1$: MOV (SP), SAVPC2+20000 


b 
oO 


Yll 27(732) 10-SEP-76 10:35 PAGE 4e 


ih 
ed 


) l MOR 
— DO@ABR.P11 STARTING 








1397 000140 OO4SE7 026204 ISR RS, RELOC+20000 
1348 Goole 
l 146 e 
1400 000150 016716 177746 MOV SAVPC2, (SP) 
] 000154 000120 CLR 98120 
: 000160 S C 
NIE ODOIG2 BFE? bE PONE: MOV” —-BSOD, SP_ : STARTING ADDRESS TO RELOCATE LOADERS 
se ° ; ‘ (=. 
tabe BROIES BASSE? fee eae Me OBRCHAERE 
1407 905172 004767 00173¢ JSR PC; SRLOR 
tape 1 000500 PTWO: MOV wSO0,SP ;STARTING ADDRESS OF 0-124K MEMORY EXERCISER. 
777 JSR PC WHERE 
IMP aeSTART -GO TO START OF TEST 
PTHREE: NOV 8500 “STARTING ADDRESS OF PROGRAM #2 
TMP a -GO START PROGRAM #2 
PFOUR: MOV 8S00,SP ;STARTING ADRESS OF PROGRAM #3. 
JSR PC. WHERE 
IMP -CO START PROGRAM 83 
: : sMEMORY MANAGEMENT TRAP VECTOR. 
PFIVE: MOV -START ADDRESS OF PROGRAM 84. 
1422 JSR ee ere 
1 01 5 PSIX apy STARTING ADDRESS OF SRANCH GOBBLE MOS TEST 
iS Gen ey te Rue 
142 900300 000167 012236 JMP BRANCH 
1428 ; 
1429 sROUTINE TO S STACK 
is Re EE oy SRVE MEED OR TSR Fic ScAVR 
1431 000304 012667 O00016 $Savr: MOV (SP)+.1¢ -SAVE RETURN PC 
1432 000310 O10S46 MOV x5,~ (SP) 
1433 O00312 O10446 MOV x4" ~( SP) 
1434 000314 O10346 MOV xg,~ (SP) 
1425 O00316 O10c4%6 MOV ’=-(5P) 
1436 000320 O10146 MOV %1,=(5P) 
1437 O0003e2 Si10046 MOV 40, -(5P) 
1438 000324 012707 MOV (PC)+, PC ; RETURN _ 
1439 000326 oo0c00 1S: 0 “CONTAINS RETURN ADDRESS 
144] -ROUTINE TO RESTORE REGISTERS SAVED ON THE STACK 
1442 “CALLED BY RESTORE MACRO OR JSR PC,SRESTR 
1443 000330 012667 ojc0dI6 $RESTR: MOV (SP )+,18 -SAVE RETURN PC 
1444 900334 012600 (SP)+)%0 
1445 000336 012601 MOV (SP)+.%1 
1446 000340 012602 MOV (SP)+)%2 
1447 OO00d42 Ol2603 MOV (SP)+,%3 
1448 000344 012604 MOV (SP)+) 44 
1449 000346 012605 MOV (SP)+)%5 
1450 000350 012707 MOV (PC)+' PC : RETURN : 
1451 000352 000000 i$: 0 ‘CONTAINS RETURN ADDRESS 


eel 


ne ee eee -~ Oe eee ee ee ee | ee ee ee ee men 
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— DD@ABA.P11 POWER FAIL ROUTINE 
14 POWER FAIL ROUTINE 
tye — Ait 
4 T TAT GISTERS 
ie Ava PBR? KIPRRD-KIPAR? SHe S803 
1458 : ON ST STACK IN PPT BELOW. 
1458 o00S02 013746 177560 p MOV TeTus 
1460 000508 004767 177572 JSR : (Fest T THE STACK 
te: mae BPO a F NOT WALLRAE 
ts 13746 MOV ; 
1464 013745 MOV SAVE SRE. 
1465 012700 MOV 8K SS OF KIPORO 
1466 012702 MOV a8. 
1467 MOV A3 
1468 18: MOV (RO)+,-(SP) :SAVE KIPDRO-KIPOR7 
th ay a iS e0 T OF KIPARO 
id 055: 23: NOV thoy tS Ve RI PRRO-KT prap 
sat c\ $ 
1473 OO0SSE 010627 3$: MOV SP’ (PC)+ -SAVE STACK PTR IN FOLLOWING LOCATION 
1474 000560 o00000 PFSTK: .WORD 0 “CONTAINS STACK PTR AFTER POWER FAIL 
1475 O00S62 012737 000572 oc00024 MOV SPUP,JSPFVEC § :SET POWER FAIL VECTOR TO PUP ROUTINE 
1476 900570 ooo00c HAL T 
1478 -POWER UP ROUTINE. 
1479 o00S72 ocode4O PUP: NOP 
1480 000574 013706 MOV aaPr -SET STACK PTR 
1481 500600 005767 OOO146 TST MMAVA “CHECK IF MEM MGMT IS AVAILABLE 
1482 001417 BEQ 48 
1483 000606 012700 172360 MOV SKIPAR7+2,R0 GET ADDRESS OF KIPAR7+2 
1484 0006 12 Ol270e 000010 MOV ag. Re 
14BS 16 010203 MOV R3 
1486 000620 012640 1S: MOV {SP +, ~(RO) -RESTORE KIPAR7-KIPARO 
1487 077306 SOB 
1488 12700 172320 MOV skIPDR7+2,R0 § _:GET ADDRESS OF KIPOR7+2 
1489 012640 2s: HOV (SP), ~(RO) “RESTORE KIPDR7-KIPDRO 
1491 nik proES 177576 MOV (SP)+, aaSRe -RESTORE SR2 
1492 012637 17757e MOV (SP}+. a@SRO “RESTORE SRO 
1493 OO0644 005767 O06246 us: TST PARAVA eee Tr Pee PARITY REGISTERS ARE ENABLED 
1494 GOO 001402 BEQ S$ 
14 D00E5e 004767 006170 - JSR PC, . MAMF -GO ENABLE BORITY REGISTERS 
1497 OO0656 004767 177446 JSR PC SRESTR “RESTORE REGISTERS FROM STACK 
1498 000662 012637 1 MOV (SP)+, aaTKS 
1499 012737 oo0024 MOV WPDWN; J8PFVEC  ;SET POWER FAIL TRAP TO PDWN ROUTINE 
1S00 CLR (PC)+ 
1501 76 10$: -WORD 0 | _ 
1502 000700 ? 177772 115: INC 10$ ‘DELAY WAITING FOR TTY MOTOS 
1503 000704 100375 BPL 11$ 
1504 7 gooo4e JSR RS, SPRINT -GO TO PRINT ROUTINE 
150s nae 20 PUWRFAIL 
1506 000714 0 6$: NOP 
1397 000716 cocdde RTI - RETURN 


= ee eee — 
oun eel 
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POWER F 


DD@ABA . P 


A: 


b~* b= 0 -= b= bbb ho be pe 
UU UN LU 
b— b= bb 0 bh be bo pe 
WON UIC UIT O 


ob 


EA AACA Raita 


ae al a 


EK 


> + b+ b+ b+ b= b&b b= b= P— 2 = b= Be dene 
uw 
cr 


000 
000734 


ere 
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O0O002E 
000012 
177724 


00000; 


L ROUTINE 
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OC000e 
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(15><12>’POWER FAILED’<15>< 12> 


‘oe TAGS & PRINT ROUTINE 


Me bs PASS COUNT 


»CONTA TERATION PATTERN 

- CONTA 

; CONTA I GI VER IMAGE 
» MEM ILABLE INDICATOR 


-Q=NOT AVAIL, -1=AVAIL 
; CONTAINS RELOCATION” FACTOR 
‘TEMPORARY WORKING LOACATION 


;ROUTINE TO PASS MESSAGE ADDRESS TO TYPE ROUTINE BELOW 
;CALL: JSR RS NT 


ICNT: 0 
ICUNT: WORD C 
ER ap: 
MMAVA: QO 
RELOCF: .WORD 0 
T: 0 
$PRI 
MESSAGE ADDRESS 
¢PRINT: NOP 
MOV (RS)+,1$ 
ADD RELOCF, 1$ 
MOV aePSW, -(SP) 
JSR PC, . TYPE 
1$: z 0 
RTS RS 


; ROUT INE TO TYPE ASCII MESSAGE. 
; THE Ce ee WILL INSERT A NUMBER OF NULL 


, TAGS | USED BY THE TYPE ROUTINE BELOW 


SFILL: 
STPFLG: .BYTE 


STKFLG: .BYTE 
STPS: WORD 


STPB:  .WORD 
.TYPE: MOV 
MOV 
ADD 
1$: MOVB 
cy 
MOV 
RTI 
es: JSR 
33: CMPB 
BNE 
MOV 
4§: DECB 


MESADR 


0 


Pc. S$ 
#12. (SP)+ 
SNULL , -(SP) 


1 (SP) 


GET ty ADDRESS 
;ADD RELOCATION FACTOR 


caer PSW ON — 

: TYPE ROUT 

‘ AINS ME ADDRESS 
; RETURN 


MESSAGE MUST TERMINATE WITH A O BYTE. 
CHARACTERS AFTER A LINE FEED. 


;MESADR IS FIRST ADDRESS OF ASCIZ STRING 


OES ML PRRCTER ore 





CONTAINS TELEPRINTER AVAILABLE FLAG 
-0/377 = T 
- CONTA AVAI 


LABLE FLAG 
STATUS REGISTER 
DATA BUFFER 


;PUSH CHARACTER TO BE TYPED ONTO STACK 


BRON aT T THE TERMINATOR 
; INATOR CHAR OFF THE STACK 


;RESTORE RO 
RETURN TO CALLER 


; TYPE CHARACTER 
: CHECK IF er cine = A LINE FEED 


Gey OF FILLERS 
GET 8 OF Pn S REQUIRED AND FILLER 


;DECREMENT FILLERS REQ. COUNT 


OE EL LE LL 


—, — a oe ee - 
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— DD@ABA.P QGS & PRINT ROUTIN 
1565 001 770 T RANCH IF NO FILLERS ARE REQUIRED 
l ize oo ? o0000e2 Pee Be ss 8 FILLER chee TER 
1562 101076 2 BR 4u§ 

l 1100 105777 177710 cs: TSTB a$TPS -WAIT FOR OUTPUT DEVICE 
1253 Boitba jaar Bre sy 
1571 001106 116677 oo0002 177702 MOVB  2(SP),aSTPB “OUTPUT CHARACTER 
1572 901114 000207 RTS pc 
1574 s XXXXXXXXXXXXXXXXXXKAXAXARAKK KAR 
1575 ERROR TRAP SERVICE ROUTINE 
1576 001118 005737 177570 ERRTRP: TST aaSwR :CHECK IF HALT ON ERROR 
1577 OOll2e2 100001 * BPL +4 ‘BRANCH IF NO HALT ON ERROR 
1578 O011e4 O00000 HALT : HALT 
1879 001126 005727 . TST (PC)+ i CHECK IE ERROR REP TO x REPORTED 
tee pti roti 2h : F NO REPORTED 
1582 001134 010667 177770 MOV SP. 1S “SET "NOT REPORTED’ 
1583 001140 O1160e MOV (SP) Re iGET PC OFF STACK 
1584 001142 767 000352 JSR PC, SFORMO ;G0 TO FORMAT 
iS8S 001146 DO¥S67 177606 JSR RS. SPRINT :GO TO PRINT ROUTINE 
1586 001152 OO1446 
1587 001154 O04S67 177600 RS, SPRINT :GO TO PRINT ROUTINE 
1588 001160 002271 DIGITS 
1589 O011b2 2s: HALT -ERROR! SECOND TRAP TO 4 OCCURRED 
1590 “BEFORE FIRST WAS PRINTED 
1591 001164 005067 177740 CLR 1S 
159 001170 000137 codec JMP 38200 -RESTART AT 200 
1594 .SBTTL ERROR ICE ROUTINE 
1595 -ERROR SERVICE CALLED JSR PC,ERROR INSTRUCTION 
1596 -OR HLT (A TRAP INST) 
1597 001174 oD0240 ERROR: NOP 
1598 O01176 Oe2757 017777 177542 CMP 817777,ERCNT | ;CHECK FOR MAX ERROR CNT 
1599 001 001403 BE 
1600 O01 062767 OO0001 177532 ADD ae : INCREMENT ERROR COUNT 
1601 001214 001000 177570 4S: BIT satT9 SWITCH 9 UP? 
1602 O01 OO1411 BEQ S 
1603 O01 042767 Ol 177516 BIC _ LDDISP  ;SAVE RELOCATION BITS 
tebe i nite ee 1 F5EI0 +h we LOTS avit a Y REGISTER 
l Bot Sue 767 1B cs: ISR BRO ae We ISTERS ON THE STACK 
1607 OOleS2 O16602 000014 MOV 14{SP) Re CALL 
aes 010201 MOV Re, Rt 
a8 oo0cbe 
1610 O01 020000 177570 BI #50000, aaSHR -PRINT OUT DESIRED? 
1611 OOle72 OO1044 BNE 1$ -BRANCH IF NO PRINTOUT 
l6le Oole7s 004767 000220 JSR PC, SFORMO -GO TO FORMAT ROUTINE 
1613 001300 OO4S67 177454 JSR RS; SPRINT -GO TO PRINT ROUTINE 
1614 001304 001463 ERRPC 
1615 001306 177446 JSR RS, SPRINT -GO TO PRINT ROUTINE 
1616 O6i3l2e 002271 DIGITS 
16817 O61314 O16602 oO0004 MOV 4(SP) Re -GET FAILING ADDRESS (IN Re? 
1618 001320 004767 000174 JSR PC, SFORMO -GO TO FORMAT ROUTINE 
16:9 001324 004567 177430 JSR RS’ SPRINT -GO TO PRINT ROUTINE 
1620 901330 002247 ADRESS 
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© 


EK 
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ae 
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-— 
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is 
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uw 
> p- 
um 
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RERB INCOR ERR ES EOS 
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= 

He 
uw 
rm 
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Ue 
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Sk 
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17757e 


MACY11 27(732) 


10-SEP-76 10:35 PAGE 46 


TSTB = PENFLG ; BRANCH IF PARITY ERROR DETECTED 
BNE 1 ‘BUT NOT FOUND 
STB PEFLG H IF PARITY ERROR DETECTED 
JSR RS, SPRINT -GO TO PRINT ROUTINE 
MOV RO, -(SP) -PUSH VALUE TO TYPED GNTO STACK 
- JSR PC’ 02A ‘GO PRINT VALUE 
ISR RS, SPRINT -GO TO PRINT ROUTINE 
MOV R3,-(SP) -PUSH VALUE TO BE TYPED ONTO STACK 
i JSR PC’ 02A 
ISR RS, SPRINT :GO TO PRINT ROUTINE 
1S: BIT 82000, d#SWR ‘RING BELL ON ERROR 
JSR RS, SPRINT :GO TO PRINT ROUTINE 
2s: TST aeSWR ‘HALT AFTER PRINT OUT 
SALT “iy 
JSR PC, SRESTR “RESTORE REGISTERS FROM STACK 
3$: MOV RO; -(R2) “RESTORE CORRECT DATA TO ADDRESS 
ADD ’Re 
RTI 
TRAP4: .ASCII ’TRAPPED TO 4 ° 
ERRPC: .ASCIZ ’PC=’ 
XMTDAT: .ASCIZ ’GOOD DATA=’ 
RECDAT: .ASCIZ ° BAD DATA=" 
BELL: .ASCIZ <7> 
“ROUTINE TO PLACE ASCII VALUE OF AN ADDRESS IN TO ADDRESS MESSAGE 
wore: es dls 
JSR PC - G0 REGISTERS ON THE STACK ; 
11$: MOV sOiGITS,R4 SS WHERE ASCII VALUES ARE STORED 
CLR R3 -WORKING & INDEX REGISTER 
SUB #2,R2 “ADJUST ADDRESS 
NOV RE’ Bi see 
TST MMAVA -CHECK IF MEM MGMT IS AVAILABLE 
BEQ 1$ *BRANCH IF NOT AVAILABLE 
BIT a , a8SRO -TS MEM MGMT ENABLED 
BIC #17777,R1 -SAVE PAR SELECTOR BITS 
SWAB StséK*?L -SWAP BYTES 
ROR R] 
ROR RI “FORM INDEX VALUE 
ROR RI 


| TEST wae O-124K MEMORY EXE 
OD@ABA . P ERROR SERVICE 
1677 001610 906001 
1B78 001612 O17102 0017ee 
ised Boies Obese 
1681 plese 103 
1682 O01 
1683 001630 OQ4270S 160000 
te mie 
ieee OO1e%6 
1687 001642 1 
1688 001644 Ql2700 O00006 
1689 001650 O00404 
io fie Bele 
i8 
i642 O01 
es ee pm 
legs Oolees leas Qoess2 
1696 00167e 005003 


1687 001674 005300 

teas BoLvas DONDE? 176424 

me ie Bree tee 

170 ree Son? 

1704 001722 172340 

1705 001724 172342 

1708 001 172344 

1 001 172346 

1708 O01 172350 

1709 001734 

1710 001736 172354 

1711 OO1740 172356 

171 

171 

1714 

1715 

1716 001742 

1717 001742 OO47E7 176336 

1318 oizee pierHs BODboE 

1558 Boise 

1721 001760 006100 

1722 001 76e 006102 - 
sf 

135% BpIze0 Braee? DOHONO 

1725 001774 OO4567 176760 

1726 902000 002034 

1727 B0e00e Oo0s500e 

1728 002004 006100 

1729 002008 006102 

i730 002010 006100 

1731 O0e0l2 006102 

1732 002014 006100 


RC 


I 
ROU 


SER 
TINE 


177630 
177750 
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ROR R1 
NOV @PARTAB( 1) , Re Siete OF PAR 
ae B ic aie 6 PLACES LEFT 
ROL R3 -2 MSB’S GO INTO R3 
SOB RO, .-4 
BIC #160000, RS ‘CLEAR PAR SELECTOR BITS 
R00 RS, Re iF ORM 18 BIT ADDRESS 

1S: ASL Re iP TRet Beir TO R3 
ROL R3 
MOV #6, RO -DIGIT COUNT 
BR 3$ -PRINT FIRST DIGIT 

2s: Q Ro 
R R3 
DEC RS 

3$ meg “ ;DIGIT 

41S: nove po & COR ofl INTS 0 MESSAGE 
DEC BEE tia COUNT 
aN 3s SRESTR “RESTORE REGISTERS FROM STACK 
BIC RELOCE 11$+42 
BIC RELOCF; 41$+2 
TS PC - RETURN 

PARTAB: KIPARO 
KIPARL 
KIPARS 
KIPAR4 
KIPARS 
KIPARS 
KIPAR? 

-ROUTINE TO TYPE OCTAL VALUE PUSHED ONTO STACK 

; CALL: MOV VALUE, - (SP) sPUSH VAL VALUE ito STACK 

has JSR PC, 

" «JSR PC, $SAVR :GO SAVE REGISTERS ON THE STACK 

MOV 16(SP) , RO -GET VALUE 
MOV »R3 - COUNTER 
CLR *WORKING REGISTER 
ROL RO 

1$ ADD aS 0.Re -FORM ASCII VALUE 

MOV R554 ‘MOVE CHAR TO TYPE LOCATION 

JSR RS; SPRINT :GO TO PRINT ROUTINE 
CLR Re 
ROL 0 
ROL Re 
ROL RO 
ROL Re 
ROL RO 


| TEST DDQAB-A O-12e4K MEMORY EXERCISER 
ERROR SERVICE ROUTINE 


_ DDGABA. Pil 


1733 
1734 
17> 
te 
1738 
1739 


1741 


ss 


a | ee 


so 
r 
G) 


AMADA SEARS 


oe 


~~ 
st 


bo 
co 
fr 


a et 
SNNNNG 
o Ser 


002016 





- 
7 


~ 
= 
J 
bree Pee Dae Pt ae fee Je 


B Rhos Bre 
PVELRSRLEE SREB SNeens® 


= = 

_ 

= = 
Ta 
fa eet here 


030460 


176300 


176566 
177636 


042101 


ee ee wee eae 


em rm ce er ete ee ee erm ee ee ee re mr em a ae we ——— 
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ROL Re 
DEC i 
SRESTR 
V PE SRESTR, 
RTS PC 
2g: WORD 0 
LODFLO: .WORD 0 
“ROUTINE TO SAVE ABS LOADER 
$LOR: TST LODFLO 
BEQ 3$ 
RTS PC 
3S: #17776.R0 
V 825, J#ERRVEC 
TST cRQ)+ 
25: CMP (SP)+, (SP)+ 
ny RO 
il 
MOV #LODAR, R2 
1S: MOV (RO)+, (R3)+ 
DEC Re 
BNE i$ 
MOV -(R3) ,LSTLOC 
DEC LODFLO 
RTS 
-ROUTINE TO RESTORE LOADER 
$RLDR: TST LODFLO 
BNE 
RTS PC 
2s: MOV SLDR1,RS 
MOY BLOT RE 
1S: MOV #1100,F6 
DEC Ro 
BNE 1$ 
MOV (PC)+,-(RS) 
LSTLOC: .WORD 
JSR RS, SPRINT 
SLORM 
CLR LODFLO 
RTS PC 


$LDR1: .WORD 0 


;RESTORE REGISTERS FROM STACK 


;CONTAINS CHARACTER TO BE TYPED 


;SET TIME OUT TRAP VECTOR 


POINT RO K TO LOADER 
3 ane Nett STORE ROUTINE 


WHERE LOADER IS TO BE STORES 
STORE LOADER 

“SAVE LAST WORD OF LOADERS 

: RETURN 


GET FIRST ADDRESS OF WHERE LOADER IS 
-T0 BE RESTORED 

: ADDRESS WHERE LOADER IS STORED 

RECT 

; RESTORE LAST LOCATION (SAVED BY SAVE 
LOADERS ROUT INE ABOVE) 

- GO TO PRINT ROUTINE 


sRETURN TO CALLER 


Ad Be! poor SS WHERE LOADERS ARETO BE 


SLORM: .ASCIZ ‘LOADER IS RESTORED? cise c12> 


EVEN 
-DIGIT TABLE 
bIGTAB: "Ol 


A —— - 
— a — era 


TEST —- O-124K MEMORY EXERCISER MACY11 27(732) 10-SEP-76 10:35 PAGE 49 
0D Pll ERROR 


GABA. SERVICE ROUTINE 
1789 002234 031462 ” 

1790 002236 O32464 “ys 

173) 002240 033466 =e? 

l o02242 040514 052123 040 i oResh ASCII ‘LAST ’ 

17 ? 115 pugsds 051147 ADRESS: .ASCII ‘MEMORY ADDRESS IS ’ 
l 020131 101 051104 

! 051505 020123 051511 

1798 902270 040 

1799 002271 060 O30060 O30060 DIGITS: .ASCIZ ‘OOOOOO ’ 

1800 002276 o20060 000 


. EVEN 


B 
RS 


ee eee ee re ee = = 
‘ 


=) 
m 
w 
-4 


Boerne | 


DODmwmoOwmMmaan 
1 b= b= be bBo Pome pe pe 
Onceryw uN cUWITU-O 


RSRTRNR RS SSS SeSRes 
Gee DERG 


pee Bee 
BR 
vee se 


RRRIRRAASS 


wn 
N 





T O-124K MEMORY EXERCISER 


ERROR SERVICE ROUTINE 


fO 


2 


0002 1e 


177570 


000024 


177570 


000004 


000250 


~~ ee ee eee 
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PLACE: .WORD 0 
.SBTTL MEMORY ADDRESS TESTS 


IMEEM a Ge Tet bis to Ten oc tO FE hEnORy 


T ADDRESS AND THEN CHECKS FOR THE CORRECT 
i I 


THE TaN el SIGNIFICANT BITS OF THE LAST AVAILABLE MEMORY ADDRESS 
; STARTI T 


TACK POINTER IS AT S00 
jAEASEHAEHS HEAR Tent AT 162 TO RESTORE LOADER#44#444444424444442% 









TORT: MOV ART1,a#212 HANGE START ROORESS 
HOV TKPTR, SP st STACK PTR 
J , SLOR SAVE MONITOR & LOADERS 
JSR RS, SPRINT -GO TO PRINT ROUTINE 
CER QRERCNT 
abe SEBS cen oie Be SP RecreTER Oo 
oe DISPLAY REGISTER 
STARTI: MOV 
CLR SRPEFLG CLEAR Pa TK FIR ERROR_ IND INDICATORS 
MOV are cece +L ORG Fae ITY ERROR REST ART ADDRESS 
PERSTRT: ov 0 AINS ADDRESS AFTER PAR ERR 
CLR LEAR PEP BRERT ION FACTOR 
NOV “SET POWER FAIL TRAP VECTOR 
;CHECK IF MEMORY MANAGEMENT IS AVAILABLE 
CLR MGMT AVAILABLE INDICATOR 
BIT eg1T12, 08SKR : RUN WITH MEM MGMT 
BNE “DO NOT USE MEM MGMT IF SWi2 WAS SET 
MOV BIS,QNERRVEC ; 
CLR aesho ; 
COM MMAVA -SET INDICATOR TO -1 Ri AVAILABLE 
iS: JSR PC, .MAMF . 
‘ROUTINE TO WRITE VALUE OF MEMORY ADDRESS INTO MEMORY ADDRESS 
“FOR EXAMPLE ROUTINE WRITES c0000 INTO LOCATION 20000 
WRTUP: MOV #DONED, JHERRVEC ;SET TIME OUT TRAP VECTOR 
MOV PC RI "LOAD TRACE REGISTER 
JSR C: LDMMO 
MOV SMAABTD QeMMVEC ;SET MEM MGMT ABORT VECTOR 
NOV scon0,, Re ;FIRST -AODRES Ss 
MOV R3, (R2)+ ‘WRITE VALUE OF ADDRESS INTO ADDRESS 
ADD #2'R3 VALU 
BR ie WRITE UNTIL DONE 
DONEO: MOV uSTKPTR, SP -SET STACK PTR 


a ee ee em ee 


me eS = Nm me me 


| TEST DDQAB-A 0-124K MEMORY 3 REL MACY11 27(732) 10-SEP-76 10:35 PAGE Sl 
| DOQGABA. MEMORY SS TESTS 


Pil 
| 1858 002510 004767 177004 JSR PC, SFORMO GO TO FORMAT ROUTINE 
| p0¢5)4 g 176240 - R RS} SPRINT ‘GO TO PRINT ROUTINE 
Ys 004567 176232 JSR RS, SPRINT GO TO PRINT ROUTINE 
| {abe ppsese 01Sl2e SCRLF 
| 1864 a : ROUTINE mt CHECK THAT VALUE OF COED /POORESS WAS WRITTEN CORRECTLY 
| TREE Bosese Ole702 c2000¢ NOV #BOODO, Re 
1867 002536 018737 002574 ooo0co4 MOV 1} QSERRVEC ; BET RHE OUT TRAP 
1868 1 MOV Re, 
1869 DOeSYe 162700 oo0002 SUB #2, RO SUBTRACT 2 
| 1870 004767 004370 JSR PC’ LOMMO 
| Ieee bopses orse03 18: MOV CRON, RG GET WRITTEN VALUE 
| 4185 Bbsepe = Bbaans CMP  —s ROR” : CHECK 
| 1874 002566 001773 BEQ 1§ 
| 1875 002570 104400 HLT -ERROR! TO DETERMINE WHICH ADDRESS WAS 
| 1876 ;WRITTEN IMPROPERLY EXAMINE R2. NEXT EXAMINE MEM MGMT REGISTER KIPARI 
| 1877 (IF MEM MGMT IS AVAILABLE). ADD Re AND KIPARI TOGETHER AS SHOWN BELOW 
1979 - 0 00x xxx XxX XXX XXX 
| 1880 : PpaR1 (772342) 0 000 YYY YYY YYY 
| 1881 ADDRESS 222 222 222 yy 222 222 
1883 002572 000771 BR 1$ 
1884 002574 012706 ooosc0 DONE1: MOV uSTKPTR, SP ;SET STACK PTR 
1885 002600 010701 MOV PC,R1 “LOAD TRACE REGISTER 
1887 ;ROUTINE TO WRITE 1°S COMPLEMENT VALUE OF ADDRESS INTO ADDRESS 
1888 FOR EXAMPLE ROUTINE WRITES 157777 INTO ADDRESS 20000 
1890 o02602 176144 TST MMAVA ;MEMORY MAGNAGEMENT AVAILABLE? 
1891 002606 001420 BEG 3$ 
1892 O02610 013703 172342 MOV JSKIPARI RB -FIND LAST ADDRESS IF MEM MANAGE USED 
1893 002614 006303 ASL R3 
1894 002616 006303 ASL R3 
1895 O0e620 006303 ASL R3 
1898 O02622 006303 ASL R3 
1897 O0262e4% 006303 ASL R3 
1898 O0e62e6 006303 ASL 
1899 002630 O102e46 MOV SP) DEVELOP COMPLEMENT OF LAST ADDRESS 
1900 Deb se 042716 Oe0000 BIC Ret SP) (SP “SAVE BITS IF MEMORY IS NOT A MULTIPLE OF 4K 
1901 062603 ADD (SP)+,.R3 
1902 O0e640 012737 007276 000250 MOV sMMABT!, JSMMVEC ;SET ABORT VECTOR 
1903 O0e646 000403 BR 25 
1904 02650 162702 ooo002 33: SUB #2,R2 sR2=LAST ADDRESS 
1905 010203 MOV Re: R3 
1906 D0eb56 103 25: COM R3 COMPLEMENT VALUE IN R3 
1907 oooc0e 1$: ADD 2 
1908 002664 O10342 MOV 43, -(R2) ;WRITE COMPLIMENT VALUE INTO ADDRESS 
1909 002666 102403 BVS ONE3 
1910 002670 Oe0227 017776 CMP Re, #17776 
1311 002674 001371 BNE 1§ 
1913 -SET UP TO CHECK COMPLEMENT DATA WRITTEN DOWN 


TS LT | LTT aR 


ee tee - me TTT 


| TEST DDQAB-A O-124K MEMORY EXERCISER MACY11 27(732) 10-SEP-76 10:35 PAGE Se 
 DDQABA. MEMORY HDDRESS TESTS 


Pll 
1914 76 DONE3: NOP 

1915 BASS 08 aga MOV PC_RI sLOAD TRACE REGISTER 
1916 002702 005767 176044 Ist HAVA ‘CHECK IF MM IS AVAIL 
i318 ober 6 Mee 990200 172342 V A3n0 S8KIPAR1  ;INIT KIPARI 

191 16 Ol 000250 MOV #MMABTO, JSMMVEC :SET ABORT VECTOR 

1920 01 002764 oOo0004 1S: MOV OONEN , @HERRVEC 

: l Ol o20000 HOV #20000, -FIRST ADDRESS 

1923 002740 100 COM RO’ “FIRST DATA (COM OF ADDRESS) 
1924 002742 oooc02 ADD #2, RO 

1925 002746 162700 o00002 2$: SUB #2. RO 

1926 O027S2 012203 MOV (R2)+,R3 GET VALUE 

1927 o20003 CMP RO,R3 : CHECK 

1968 001773 BEQ 25 

1 104400 HLT 

1930 002762 000771 BR 2$ 

193) 002764 000240 DONE4: NOP 

1 ROUTINE TO IT ben # INTO ALL ADDRESSES IN A 4K BANK 
1 002766 012737 003034 o00004 MOV JSERRVEC;SET TIME OUT TRAP VECTOR 
1 002774 010701 MOV PC,R1 

1aap moans nee vines 000250 si arAEBTO, #MMVEC 

iéaa Gosnis ptsrae oean00 NOV 8 

1939 003014 o0S000 CLR RO 

1940 003016 095200 1S: INC RO ;RO WILL BE DATA WRITTEN 
1941 012704 010000 MOV #4096. . RY “SET 4K 

1942 O03024% 010022 25 MOV RO, (Re}+ “WRITE BANK # INTO ALL ADDRESSES 
1943 003026 005304 DEC RY 

1944 003030 001375 BNE 25 

13H 003032 000771 BR i$ 

oun 003034 O226b26 DONEYA: CMP (SP)+, (SP)+ “ADJUST STACK PTR 

1233 oxanae o1zrar cosioy coco *%E™ Tht OFTAMEATTEN SBR RH 

tae Bospae 010701 MOV JRI 

1952 003046 004767 004074 JSR PC’ LOMMO 

1953 903052 012702 de20000 MOV #20000, 

1 903056 o0So90 CLR RO 

1955 003060 005200 1S: INC 

1 612704 010000 MOV #4096. .R4 

l 012203 2$: MOV (R2)+,R3 

l o20003 CMP RO.R3 

1959 001401 BEQ +4 

1960 003074 104400 HLT 

1961 003076 005304 DEC RY 

1962 003199 001372 BNE 2 

1963 102 66 BR 1$ 

1968 003104 O22626 DONEYB: CMP (SP)+, (SP)+ 

1966 -ROUTINE TO WRITE CONSTANT DATA INTO 4K 

1967 ‘BANK STARTING WITH LAST MEMORY LOCATION 

1968 903108 010701 MOV PC.RI 

193 903110 612737 007276 o00e250 MOV WMMABT JeMMVEC 


mm em me —— = 


< ——— 


a a i a st. — = eee pe ee ee eee ee me we = 


' TEST DDQAB-A 0-124K MEMORY EXERCISER MACY11 27(732) 10-SEP-76 10:35 PAGE S3 
 DD@ABA.P11 MEMORY 








ADDRESS TESTS 
1970 0031 oooco2 #2, Re 
i37e a is C 
l 0031 l 010000 MOV #409. RY 
1974 2 MOV RO, = (Re) 
ine eye Re 5776 CHECK IF DONE 
ie —_— 
18 BNE 2 
1980 BR 1$ 
138 000004 DONEYC: MOV BDONEYD, JSERRVEC 
i MOV PC RI 
l ISR PC 
000259 HOV TO, gartivec -SET ABORT VECTOR 
l 1S: CMP #4096. .R4 -CHECK IF WRITE ABOVE STARTED ON 
1 -4K BOUNDARY 
l BEd 2 
1 (R2)+,R3 
1991 CMP RO. R3 
1992 BEQ 44 
2 RS 
l 1§ 
139% 25 INC RO 
1 MOV 84096. .R4 
l 2 MOV (R2}+,R3 
1 CHP RO.R3 
BEQ +4 
3$ 
2$ 
DONEYD: CMP (SP)+, (SP)+ 
TST #4 :BRANCH IF PROGRAM WAS NOT ; 
9 GINI : VIA ACT1I IN QV OR AA MODES 
TST LOGICAL+2 IF NOT IN QV MODE 
BPL BEGIN 
po0e% 00742 MOV 86, J8ICNT -SET ICNT TO DO 1 PASS ONLY IN OV 


+. es es ee eo 


SSSOSses 


~~ >-— > -< p—~ & © p—~ pe 


DOQAB-R O-124K MEMORY EXERCISER MACY11 27(732) 10-SEP-76 10:35 PAGE S4 
Pil ADDRESS TESTS 


MEMORY Ss 
3 
< - THIS eye yer neva FB TEST PATTERNS THROUGHOUT 
: n atk THEY CAN BE WRITTEN 
: 012706 000500 itt PTR, SP sSET STACK PTR 


003272 
003276 004767 O03S44 ae eee PARITY ACTION 


608330 000004 2 ile aca pe ae 
;WRITE 1 aa 8 "Pei PATTERN START BATE a 






7 
B27 
010701 
01274 000001 a 1,5 (SP SP) : PUSH STARTING BANK ON THE STACK ACK 
Bid da - 
033< Spares 004162 au PC, 1x8 :PUSH ROUTINE TO WRITE | XOR 8 PATTERN 
-CHECK 1 XOR @ TEST PATTERN WRITTEN ABOVE 
003330 012737 001116 oo0004% SONES: MOV 
012706 1S: MOV einer 
010701 MOV GISTER 
01274 000001 MOV 8 ON THE STACK 
003350 005403 NEG HoRTAG MS OOF 125. WORD BLOCKS 
003352 010346 WRI N BY 21x ROUTINE ABOVE 
003354 004767 oo4244 JSR 
003360 005027 (PC) wet INDICATOR TO WRITE NORMAL 3x2 PAT 
003362 o00000 PARPAT: . 
sae 2308 3 XOR pita AT _BOORESS ADDRESS 20000 
= NO Ty HENORY IS AVAILABLE, 
AND AVAILABLE . 


rare he eaniTy INDICATE 2 NORMAL/MODIFIED PATTERN 





Ren eR Re ROB UMO DRM SeSaRI AR! Sawa R NT ER BNO NNR OS 


012706 oo00sc0 BONES >SET rie PTR 
Bee 003412 900004 T ect Tree VECTOR 
012746 000001 : STARTING BANK 8 ON 0, RITE 
oOHe ear Hea 
ie sais j CHECK 3 BS q WRITTEN ABOVE 
Bigeoo Gobd0e HOV seat, Te GET 8 OF 256. WORD BLOCKS WRITTEN 
ee fine en Ce tay ee 
a WOS. 256: - WORD 0 alae i AINS a OF 256 WORD BLOCKS IN MEM. 
Viet an tc Hy OBE RIT apt SraeK BTR 
003440 012746 000001 MOV 81,-(SP) ; PUSH BANK @ ON THES 
posit 010046 MOV RO. -(SP) OF 255. WORD BLOCKS TO WRITE 
004767 O04626 JSR PC’... 3x9 G0 BD CHECK A WRITTEN 
. SETUP 19 RUN MODIFIED 3 XOR 9 PATTERN IF PARITY MEMORY IS AVAILABLE 
o034se2 9057 007116 TST JBPARAVA -BRANCH IF PARITY MEMORY IS NOT AVAIL 
002456 0014 BEQ 
N02465 0057327 9022te2 TST JHPARPAT “BRANCH IF PARITY PAT JUST WRITTEN 


TEST 


2069 


os 


RRS BRE Bg Ios 


Se Umi ToKE SSRIRRe BRB ES SAAS aE 
pce Greece 
£— To 


e— b—- b -~ b-= & -+ b> BD - + b 


rorurururururururururururorurururorurururururururu 
rurororu 
PRB ia we Norw ewr-o 


b+ b= bb b= 


OC3464 





003644 
003646 

50 
003654 
003660 


: 


5 EutCe 


BAB-A O-124K MEMORY = 
il WORST CASE NOISE | 


000040 
003632 


RCISER 
TESTS 


MACY11 27(732) 


BNE 
Be 


10-SEP-76 10:35 PAGE SS 


DONES 
SeyBRPARPRT SET. IKOLCATOR To MRLTE 219 Pa aT 


ARATE TE 8 nee” 13 eel ia vce itt -} 1 pORtE SS 40000 


BQ0NES, @ RRVEC 6 ME QUT TRAP OR 
nov te Te eat sHER 
CLR -(§P) 8 OF Baws 10 faite On ON tues STACK 
JSR PC, .8X13 :GO TO ROUTINE TO WRITE DATA 
-CHECK 8 XOR 13 T TPATIBRN WRIT 
ASHES. MOV asTuerh betes 
MOV fe TRACE REGISTER 
MOV amie, JBERRV 
me 
BIC H RY -SET 4K BANK COUNT TO 8K INCREMENT 
Q PONE LO. : 0 NOT CHESK IF ONLY lok 
JSR PC; . 8x13 -GO CHECK 8 XOR 13 PATTERN WRITTEN ABCVE 


PEL 


OCA 


10: 


oe ot CHECK MOORES eam e NER RGnT 


Mo eve l m 8 PATTERN 
ITY AC ne 











1S: TST a4 “CHECK IF PROGRAM LOADED VIA ACT! 
SS RANTST :DO NOT RELOCATE IF ACT1! 

2s: MOV eSTKPTR, SP “SET STACK PTR 
JSR 5, RELOC “RELOCATE PROGRAM CODE 
po00000 : ood000 TO 
a {GAS RELOCATION SSFUL? 
a0 ™ ia MEMORY TO MeL OCHTE TO 15 
JMP QaRANTST ee 

33: ADD , PC : 
ADD SP STACK PTR 
BIS g. LDOI OCATION INDICATOR 
MOV LOOISP, da Y:LOAD DISPLAY REGISTER 

ROGAN 16 NOW EXECUT 


‘CAUTION: "Bo NROT AT 


Ine cove Ron Fe Ae San gelOu s20000. 


SHOWN OW + 
T TO START PROGRAN ay ai 


GHHMHEHBMEMMEHHMHGHBEHHHEHEHHEE HEHEHE EERE £2222002222224 
DONE11: MOV 


MOV 
JSR 


PC,R1 -RESTART ADDRESS TO LOOP TEST 
-WRITE 1 XOR @ TEST PATTERN IN LOCATIONS O00000-017776 
CLR -(SP) -PUSH STARTING BANK & ON THE STACK 
#32. .-(SP) -PUSH # OF 128. CKS TO WRITE 
pc, . {xe -GO TO ROUTINE TO WRITE | XOR 8 DATA 
PC.R1 “RESTART & LOOP TEST ADDRESS 


MCV 


CO LD LLL LL EDO OE 


_ TEST woes O-124K MEMORY EXERCISER MACY11 27(732) 10-SEP-76 10:35 PAGE S& 
DD@ABA . P WORST 
















*# 
OW #40000 OR +10000° 
KFLLFLELESHESEASSELRLLELLRLELSRLLE ED 


COP. RRL ech Peis 


 ceenansaeeuouseumseuaenseleest FLHERAELELESRESERE 


CASE NOISE TESTS 
l -CHECK 1 XOR @ TEST PATTERN AS WR WaITIEN 
sis? o0S046 otk -(SP) EN aeove BANK 8 ON THE STACK 
2le7 012746 900040 MOV iy art +o WORD BLOCKS TO WRITE 
sige 004767 003730 JSR 1x TO ROUTINE TO CHECK DATA 
2130 ‘RELOCATE PROGRAM a CHECK meus 000000 - 037776 USING 
ei : 070 jai O8 al Ee A _ : UPDAT GIST 
e133 ee oo2446 LOC : MOVE PROcran Pra FF LOWEST 4K 
te fie Gee el 
2! 137 003712 IMP a8. +4 ‘RETURN UNRELOCATED 
: 37 12767 040000 MOV #40000 
2 3 ee erie BIC “CLEAR RELOCATION INDICATOR 
< 40 016737 175010 HOV Y pare iD }SPLAY NOT RELOCATED 
2 ae pera pe TST a “CHECK IF 12K OF MEMORY IS AVAILASLE 
5 ws ger res TS atti CHECK IF 20K OF MEMORY 
5 45 7 bina 3 r 
2146 006367 000100 ASL BLKCNT 
2147 1 000500 MOV a8 KPTR, SP :SEt SL 
: 4g 1 MOV afd ISTER 
49 100000 BIC ai JeLDDISP” OCATION INDICATOR 
2150 013737 000750 MOV JSLODISP, ISDISPLAY 7ivono DIS DISPLAY REGISTER 
2151 004567 002324 JSR RS, RELOC 
2152 000000 : 
2153 040000 ‘FROn 
2154 005704 TS RY :RELOCA ION SUCCESSFUL? 
2155 001402 BEQ 4g 
2156 000137 oo42Se2 33: JMP QBRANTST -GO TO RANDOM DATA TEST 
2157 065707 1777be 4g: ADD 3. PC ;RELOCATE P PC 
: 2 peers 190006 174672 ars Py an Rat OH INDICATOR 
e160 016737 174666 177570 MOV #100090 iti Y: REL ORD DISPLAY REGISTER 
2162 
: 63 
64 
2165 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 


> + 0-2 © = 6 bb 2 & + bb b+ = b-* bb 0 + bb 0 Bb = Fb = 9 P= = bb bb bb bb ps 


ck 
67 OO4064 005037 003362 CLR  @8PARPAT ;SET INDICATOR TO WRITE NORMAL 3X9 PAT 
= 010701 DONE13: MOV  —«- PC, RL :UPDATE TRACE REGISTER 

70 ~ ;WRITE 3XOR9 TEST PATTERN IN LOCATIONS 900000-037776 OR 990000-077778 
73 Downs Ols7ae nov (Pes, -(SP) PUB Soe. BLOCK wor COU Ba ON STACK 

73 004076 BLKCNT: .WORD 0 : CONTAINS 2e6. BLOCK QADED 
74 ‘BY ABOVE ROUTINE. NO7100 fF 818K 

75 004100 004767 003754 JSR —- PC, . 3x9 

77 {CHECK PATTERN WRITTEN IN LOCATIONS 000000-037776 OR 00000-07777 

78 OO4104 010701 MOV PCI ie 

73 04106 O05046 CLR (SP) ;PUSH STARTING BANK & ON THE STACK __ 
e¢ 304119 O1E746 177762 MOV -BLKCNT,-(SP) {PUSH 356. WORD BLOCK COUNT ON THE STACK 


Za 
: 


es 3 5 


fave paw pene fo b— b-- p-- pe po D> 


@ 
p< 


erry rururury rururrururururururunaty 
Po BBBIRR PSE 
2382 833 


BESRRESCS 


a8 


aRaeeS 


eee 


. 


es 


RRR RURNRIR 
Wt Nou £ GITUe- 


SSS SSNS 


etm SSRRES 


zeae 
oe &SR 


: 


004767 


008737 


001003 
010667 


010701 


0127 
014400 
014203 


004160 


007116 
003362 
177222 


000002 
004634 


005477 


T ove O-124K MEMORY EXERCISER 
WORST CASE NOISE TESTS 


oOC02e 
177670 


000750 
177570 


172304 
172344 
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JSR PC,..3X9 ; CHECK 


;ROUTINE TO CHECK IF tlle 3 XORS PATTERN SHOULD BE RUN 
TST asPARAVA ;BRANCH IF PARITY MEMORY NOT AVAIL 


T ‘BRANCH IF MODIFIED PATTERN JUST RUN 
BNE DONE 14 
MOV PARPAT TO WRIT IF am PAT 
BR TER FIED 
-WRITE 8 XOR 13 TTERN IN a 
BONE14: MOV at 


i BR 6313 Bren dee tHe” STACK 


;CHECK 8 ot 13 <p es WRITTEN ABOVE 





MO ;UPDATE RESTART & & LOOP AD ADDRESS 
CLR - (Pp) fg Bae 
MOV #2, -(SP) ANDY 8 OF pane TO check (2) 
JSR PC’. 8x13 -GO TO CHECK ROUTINE 
-RELOCATE PROGRAM BACK TO LOWER MEMORY 
BONEIS: MOV #40000, 1$ 
840, BLKCNT 
;UPDATE TRACE REGISTER 
: MOVE BACK INTO LOWER 
1$: 3 FROn OR 
“RETURN UNRELOCATED 
RESET STACK POINTER 
#00 SP “CLEAR RELOCATION INDICATOS 
ISP, a80 ot ay “LOAD DISPLAY REGISTER 
.SBTTL RANDOM DATE ROTATING 1 1/0 TESTS 
RANDOM DAT DATA TEST. THIS TEST MOVES THE PROGRAM COD CODE THROUGHOUT MEMORY 
oe JS eERRVEC ‘ET T AAS OUT TRAE 
TST MMAYA Greek IF FFE MT 1S IS AVAILABLE 
INCB Be , 1 360 of a iP fen SSING IN FIRST 
asoONeeE -400+UPSRN, Jak! -SET KIPDRO=RW ‘fe 209 BLOCKS 
MOV #400, J8K IPARS 
1S: MOV 820000, ;SET 'TO’ ADDRESS POINTER 
CLR RY “SET "FROM SS POINTER 
25: MOV #2048. RS SET 4K WORD COUNT 
33: MOV (R4)+, (RE)+ ODE 
MOV (R4)+, (R2)+ 
DEC RS -DECREMENT 4K WORD COUNTER 
BNE 35 
MOV 84056. -PLACE+1,R5 SET ay _— COUNTER 
ug: MOV (R4) RO -GET ‘GOOD’ D 
MOV ~tR2)! "R3 GET "BAD" ORT 


——_—— ee 
A A ell. lL LL LL A AE - ~ 


| TEST ne O-1 





012442 


MEMORY EXERC 27(732) 10-SEP-76 10:35 PA 
DATA.R CTPA Ll ot ate a = 
CMP RO, R3 ‘COMPARE ’GOOD’ & ’BAD’ DATA 
ref PB) STEP ADDRESS FOR ERROR ROUTINE 
TST -(R2) STORE SS POINTER 
Ss: DEC RS pt. 4K WORD COUNTER 
BNE ug ‘LOOP UNTIL 4K WORDS CHECKED 
174362 TST MMAVA -CHECK IF MEM MGMT IS AVAILABLE 
BEQ bs ‘BRANCH IF NOT AVAILABLE 
172342 INC SKIPARI 
172344 INC dak IPARC 
000100 6S: ROD aby. ,Re -STEP ADDRESS 
7S: MOV 8STKPTR, SP -RESET STACK PTR 
001116 oo0004 MOV BERRTRP, JRERRVEC; RESTORE ERROR TRAP VECTOR 
“ROTATING O TEST. THIS TEST ROTATES A SINGLE ’0’ THROUGH MEMORY 
177777 OO10S2 ROTO: MOV 8-1, .CONST 1 Sa) =177777 
: as eee 
176766 -255,-(SP) Su BLOCKS IN MEMORY 
JSR PC, .USER ; "MITE THROUGHOUT MEMORY 
MOV PC, 1 ’ 
l MOV #1°-(SP) se! an BANK 8 
176750 MOV WDS . 256 -(SP) WORD "aL OCKS TO CHECK 
ISR PC, ROTO a5 ri ST “Q ROUTINE 
;ROTATING 1 TEST THIS TEST ROTATES A SINGLE °1’ BIT THROUGH ALL OF 
001014 ROTi: CLR : T -CLEAR CONSTANT 
l MOV #1.-(SP) ;PUSH STARTING "BANK ONTO STACK 
176730 HOV HOS. 256 ,~ (SP) jAND 8 . WORD BLOCKS IN MEMORY 
004 J PC. -GO WRI fre 
MOV PC RI - SET SCORE PTR 
ooo00 MOV 1 (SP) BET STARTING BANK 8 
176712 MOV .256.-(SP)  :SET 8 OF 256. WORD BLOCKS TO CHECK 
004s JSR PC, .ROT! -GO ROTATE A *1’ BIT THROUGHOUT MEMORY 
-END OF CYCLE 
go00So 000072 END: MOV #50, TEMPO 
1% RESET 
900064 DEC TENPO 
o00100 173022 a , SHR 
BEQ 2 
173474 CLR EOPHLT 
este _ Ook Or ABRCT 
2g: V Be’ : UPDATE TRACE REGISTER 
000500 MOV eSTKPTR, SP -SET STACK 
000742 INC ICNT ; INC MENT BASS COUNT 
000007 000742 CMP 87, J8ICNT SES? 
BEQ DONE B RANCH IF 8 PASSES COMPLETED 
174144 JSR gph SPRINT ‘GO TO PRINT ROUTINE 


_ TEST DDOQAB-A 0-124K ME 
| Pll RANDOM 


ERLE 


Roisin iais 


3 


Seana 


000137 


ns E 





MORY EXERCISER MACY11 27(732) 
DATA, ROTATING 1/0 TESTS 
003272 IMP 
TEMPO: .WORD 
DONE: 
174130 JSR 
ENDMSG 
177564 TSTB 
BPL 
000042 MOV 
BEQ 
17S2S6 JSR 
RESE 
LOGICAL: JSR 
NOP 
NOP 
NOP 
17S4S6 FINISH: JMP 


.SBTTL 
.SBTTL 


;PROGRAM # 2 
i BOMES 10 TEST A 
PRG2?: CLR 


005067 001124 RGe: 
012706 o0g0S00 PRG2A: 
005037 006622 CLR 
005027 
000000 ALLFLG: .WORD 
012737 oo0so2 oo00e4 MOV 
012737 000004 MOV 
005067 174022 CLR 
000412 BR 
032737 010000 177570 BIT 
001006 BNE 
00026 1 SEC 
005737 177572 TST 
103402 BCS 
005167 173774 COM 
012737 001116 oOsooo4 1S: MOV 
005037 000742 CLR 
005037 CLR 
005037 CLR 
032767 172562 BIT 
000000 HAL T 
TST 
BEQ 
og2022 JSR 
005767 ocooso 35: TST 
01002 BNE 
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deBEGIN} 
0 


RS, SPRINT ;GO TO PRINT ROUTINE 

re ;WAIT FOR BELL TO RING 

ae eane ;GET DECTAPE MONITOR RETURN ADDRESS 
PC, SRLOR sRESTORE MONITOR & LOADERS 

PC, (RO) ;GO TO DECTAPE MONITOR 
START1 

USER Ha 


OWS THE USER TO SELECT A_STARTING 4K Sa OF 4K 


S 
AND A WORST CASE PATTERN TO WRITE AND 
PRG3FLG “CLEAR PROGRAM # 3 F 
3 PROGRAM’ # 2 HERE. WITH PRG3FLG = 1 
#S SP -SET STACK PTR 
JePEFLG “CLEAR PARITY ERROR INDICATORS 
(PC)+ “CLEAR RUNNING ALL PAT 
0 “CONTAINS RUNNING PA 
SPOUN. OSPFVEC SET POMER FAIL TP VECTOR 
#ERRVEC+2, JSERRVEC 
1S ; TELCO SYSTEM DOES NOT HAVE MEM. MANAGEMENT 
SWl2 IS BEING DISCONNECTED. 
“CAN BE RECONNECTED BY DELETING 
“THIS BR INSTRUCTION. 
#BIT12,a¢SWR § ;CHECK IF TEST IS TO BE RUN 
1$ WITH MEM MGMT ENABLED 
a#SRO -CHECK IF MEM MGMT IS AVAILABLE 
1$ “BRANCH IF NOT AVAILABLE 
MMAVA 
#ERRTRP, JSERRVEC 
DSICNT 
J#LDDISP 
J#PARPAT -SET INDICATOR TO WRITE NORM 3X9 PAT 
#SHOL, SUR -IS THERE A TTY? 
-PARIT 
3 
PC. MAMF 
. STBANK 
Ug 


ee eee ee mae oo eo ee ee 


. TEST DOQAB-A O-124K MEMORY EXERCISER MACY11 27(732) 10-SEP-76 10:35 PAGE 60 
ODQABA . P11 PROGRAM # 2 





2343 o0so32 004767 001414 - ISR PC, RELOCP 
173714 cs: ie PRE INT -GO TO PRINT ROUTINE 
004616 JSR PC, RECD GO GET ANSWER TO THE PARITY QUESTION 
-PARIT: .WORD 0 ‘TYPE 1 IF PARITY DESIRED O IF NOT 
00S0S4 ? 177772 TST -PARIT 
2356 BEQ 1$ ‘BRANCH IF PARITY NOT DESIRED 
2357 004767 001760 ‘ JSR PC, . MAMF ‘GO ENABLE PARITY ACTION 
2359 OO4S&7 173666 JSR RS, SPRINT -GO TO PRINT ROUTINE 
2360 005072 012155 STBANK “ASK USER FOR STARTING BANK 
2361 005074 004767 004570 JSR PC, RECD 
o3be 1051 _STBANK:.WORD 0 -CONTAINS STARTING BANK 8 
005 1 ? 177772 TST . STBANK ‘CHECK IF STARTING AT BANK 80 
2364 0051 1002 BNE i$ 
2365 005110 004767 001336 os JSR PC, RELOCP GO RELOCATE THE PROGRAM TO TOP OF MEM 
ii < ° 
seo 905114 OO4SE7 173640 JSR RS, SPRINT :GO TO PRINT ROUTINE 
2368 005120 012204 BANKS -ASK USER FOR # OF 4K BANKS TO TEST 
soo Hele Buoy a eae 
-BANKS: .WORD 0 :CONTAINS ® OF BANKS TO CHECK 
2371 005130 OO4S67 173624 JSR RS, SPRINT -GO TC PRINT ROUTINE 
2372 00s 134 012241 PAT “ASK USER WHICH PATTERN 
2373 i 767 O04S26 JSR PC, RECD 
2374 O05142 pogg0g PAT: .WORD O : CONTAINS PATTERN 8 
2375 005144 O12767 O0S144 175210 PRG2R: MOV #PRGOR, PERSTRT PAR ERROR RESTART ADDRESS 
2376 005152 004767 004574 JSR PC. CKSUR “GO CHECK SWITCHES 
2377 OO0S1S& 016700 i77760 MOV PAT, RO 
2378 162 AY teks # TO FORM INDEX 
164 066 173564 OCF. RO RELOCATION FACTOR 
cai GEN pom Gree my meraeetmo™iago Meera ran MUS 
o38e 005200 010007 Rope 1900 RELOCATION Fa ROUTINE 
OF ROUTINES TO WRITE SELECTED PA 
sige o0S202 00S222 iar Toe: HORD ‘the -1 XOR 5 BRUT INE 
2386 005204 O053ie :3 XOR 9 ROUTINE 


(0) 

{]} 

se eh Bee eo an 

iS Bee oo ely MTT 

e351 Qoesle 006/70 “WORD Hee SBARITY 3 XOR 9 PATTERN (2) 
2393 


-WORD SALL “ALL EXCEPT USER (?) 
2394 - ROUTINES 
2395 O00S222 Oib746 177652 $1x8: MOV .STBANK,-(SP) ;GET STARTING BANK 8 
23% 005226 D176 177674 NOV ;BANKS, -(SP) : GET .? OF 4K BANKS 
saan tose press s oceseo Tey SREFLG iM TPL 8 os STOP WITH 256. 
2399 001004 BNE 1$ :WORD BLOCK 
ao Sew Sele a e 1 a 
S402 Bpesue 006316 ASL (SP) : COUNT 
24 006316 ASL (SP) 
2404 G0S252 011627 1S: MOV (SP). (PC)4 . SAVE 


—o—- <a -- _ - - 


— Se 


A 


— ee rer re oe —— = oe eee 


Yat a 


Bata 


_ ODGABA. 


e405 


ron 


bo b= bo be bm b= Be be pe 
—-OWOnwewrul culo 


004557 


002230 
1776le 
1 





172ebe 


2$: . WORD 4 
ISR C,.1Xx8 
MOV TBANK, -(SP) 
MOV 8, “(SF 
JSR 
INC re Rar’ 
TST BLLELG 
BNE $3X9 
BR $1X8 
$3X9: MOV . STBANK, - (SP) 
MOV . BANKS, -(SP) 
TST PRG3FLE 
BNE 18, 
ASL (SP) 
ASL (SP) 
ASL (SP) 
ASL (SP) 
1$: MOV (SP), (PC)+ 
cs: .WORD QO 
JSR PC, .3x9 
-CHECK PATTERN WRIT 
3$: MOV ST BOS 
MOV 2$, -(SP} 
15R .3x3 
NC I 


TST ALLFLG 
X13 


$8X13: TST @8PRG3IFLG 
BNE 
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ile RITE 1 KOR'B TEST PATTERN 
Y START 


WORD BLOCK COUNT 

i T CHECK PAT ER 

160 START. ax9 PATTERN IF RUNRING ALL 
‘OTHERWISE L 

;GET STARTING BANK # 


;GET 8 OF BANKS 
51 PROGRAM SO 2 STOP WITH 2Sé. 


——e 
: 


se 
a 
zt 
: 


82 SAR 8 
e- 
- ts 
2 . ; 
ee 
= 8 


ALL PATTERNS 
TTERN IF RUNNING ALL 


ad 
5 
BS 


13 


;CANNOT DO _ PATTERN USING 


;GO WRITE PATTERN 


;GO CHECK PATTERN 


;CHECK IF RUNNING ALL _PATERNS 
:GO DO ROTO PATTERN IF ALL SELECTED 


1$: 
JSR RS, SPRINT 
ST : PRINT 
J PRG2 "RESTART 
25: ISR PC. .8X13 
MOV . STBANK , - (SP) 
MOV " BANKS, - (SP) 
JSR Pc. ..8x 
INC ICAT 
TST LFLG 
BNE O76 
R $8X13 
j ROUT INE TO WRITE & CHECK USER CONSTANT 


JSR RS, SPRINT 


;GO TO PRINT ROUTINE 


ee 
a CALLED LLL LE LEE LL A OLE ew ee ere 
——  ————— ee = = 


HEEHERE & 


RRR 


? 
2 


ee 
au 


yt 3 
aa 


Sa 
ce RRs Re 


SOUR R SBME Baw aRReS 


TORR RN 
Ours wre 


atitg 
See 
a 





| TEST DDQGAB-A O-124K MEMORY EXERCISER 
| PROGRAM & ¢ 


177644 


MACYi1 27(732) 


sROTATING ’0’ ROUTI 
OTC: 


we ew wr ee rr re re re em eee se ee eee es eee -——_—— oe -- — - —— «<< 
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PC,RECD 
. STBANK , ~ (SP) 


; BANKS, - (SP) 
3FL6 


ate 


. STBANK, -(SF) 
" BANKS, -(SP) 
PRG3FLE 


;ASK FOR USER CONSTANT 


Gey star nae eA a 


;GET 
sMULTIPLY 4K BANK COUNT BY 16. 
-TO FORM 256. WORD BLOCK COUNT 


«SAVE 


;GO WRITE USE™ CONSTANT 
;GET STARTING BANK 

# Cr WORD BLOCKS 
‘GO TS USER CHECK ROUTINE 


CHECK IF USER HAS TYPED A CHARACTER 
CLEAR FLAG 


-GET STARTING BANK 8 
GET # OF BANKS 


;MULTIPLY 4K BANK COUNT BY 16. 
;TO FORM 256. WORD BLOCK COUNT 


CONTAINS: = WORD BLOCK COUNT 


aT alata 


WORD BLOCKS TO CHECK 
RAEN pray Sarre 
ISPLAY 
;CHECK IF RUNNING AL‘ PATERNS 
:60 O10 SROT1 IF RUNNING ALL PATTERNS 


GET STARTING BANK § 
:GET & OF 4 K BANK 

"CHECK TF RUNNING PROGRAN 3 
:SSANCH IF RUNNING PROGRAM 3 
iSHiiT 4k BANK COUNT BY 16. 

‘TO FORi 256. WORD BLOCK COUNT 


; SAVE 
; CONTAINS - cae WORD BLOCK COUNT 
sSET CON 

:GO WRITE O'S THROUGHOUT 


——— —, -<— 
~ ee rr —_———— 


-_—— =- ce a es ewe eee ee + _ - - - 


| 
| 








i 
i 
e4 
: 


ERHSES 


016746 


012706 


177136 
77756 


177570 
\7elle 
000254 


EE 


| TEST DOQAB-A O-124K MEMORY EXERCISER 
DD@ABA. P11 PROGRAM # 2 


000236 


meee a eee eee 
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MOV pe -(SP) 
iam 
math is 


ORO STen BANK . 
1 PAYTERN 


1 PRR partems 


BEQ SR E NOT NNING ALL PATTERNS 
IMP $1X8 iho bo! $1X8 PATT 

“ROUTINE TO CHECK MEMORY USING 3 XOR 9 PARITY PATTERN 

$3x9P: MOV AT -SET INDICATOR TO WRITE PARITY PATTERN 
JMP 3x9 

-ALL PATTERNS 


$ALL: MOV ALLFLG -SET INDICATOR 
JMP ‘BEGIN WITH 1X8 TEST PATTERN 
“SBTTL R #3 


; THIS PROGRAM IS THE SAME AS PROGRAM # 2 ABOVE EXCEPT THAT 256. WORD 
; DATA ee MAY BS BeeTT N 


PRG3 SET STACK P PTR 
1, (PC)4 
PR OA aoe TRIE 
JSR RS, SPRINT -GO TO PRINT ROUTINE 
MP PRG2A -GO TO PROGRAM 2 


irene ree MAY Y BE US USED To READ/WRITE A USER CONTANT INTO ANY 





ON STKPTR, SP ;SET STACK PTR 
PARITY ERROR INDICATORS 
i @BERRVEC’ 
MOV #.+4.PC sRELOCATE BACK TO FIRST 4K 
IR RS, SPRINT -GO TO PRINT ROUTINE 
SADRSO TPORD “bcos ; SONTAI BITS <15-0> 
" MOV .1617,.EXTAD  ;GET EXTENDED BBCRESS BITS <17-1> 


ROR d&SWR ;CHECK SWITCH O 


PRGYA 180 T 

eee RS, SPRINT 1 BRENT : TOUFINE 
CONST 

SCONST TOORD ‘alae sGONT 

174222 PRGHA: HOV #PRGYA, PERSTRT ie! T estan eooRe ob y ROORESS ON ON PAR ERROR 

MOV -EXTAD, RY GET T ADDRESS BI d71b» 
BNE ; IF MEM MGMT REQUIRED 
CMP #0000, R3 ; CHECK IF Ss 1S LESS THAN 20000 
BLOS sd TF aT Te NO 
ROR ASU : CHECK iF READING 
JSR PC, S$SAVR iB REVERE RFC PERS ON THE STACK 


JSR PC’ RELOCP :GO SEL OCATE PROGRAM 


i re me me me te 


eee ee ee 


4 
m 
w 
“4 


ee ept re teuaaaaaaaa acer en ee ee ecg 






4 


Eien PHESSORCnRe cece en 


4 


eeeee 


OmLVe 


——_ “ -— ee eee me H+ et ee ee ee a ae ee eee 


004767 172126 


Resa 


S888 
= 
<= 

ro 
wW 


160000 


017776 


“A 0-124K MEMORY EXERCISER 
PROGRAM # 4 


000060 
177560 


177556 


O00643e 000004 


MACY11 27(732) 


LL I eA a 
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ISR PC, SRESTR ;REST REGISTERS FROM STACK 
13: CMP #160000, 83 : CHECK I SEQUIRED 
BHI 166 6 TF not eautteD 
10$: MOV R3, Re it BITS <15-0> 
MOV #6, RO ‘SET SHIF 
25: ASR RY : SHIFT 18 BIT ADDRESS 
g R R 36 *6 PLACE 
ISR PC, LOMO ;60 SETUP MEM MGMT 
me era ta eless arre cs 
. -6) 
BIS 120008, SEY aopRess RECISTER 
3$: MOV R3 : GISTER 
ug: MOV Sean iE DEER CONC HAUT 
MOV #PRGY.QSTKVEC :SET KEYBOARD INTERRUPT VECTOR 
BIS #100, a8TKS “SET IE BIT IN KEYBOARD CSR 
ROR gus “CHECK SWITCH O 
Bcc IF NOT SET 
MOV (R2).-(SP) “PUSH DATA TO BE TYPED ONTO STACK 
JSR ,0eR GO TYPE DA 
JSR RS; SPRINT -GO TO PRINT ROUTINE 
abo" -STEP ADDRESS 
ADC 34" 
BR PRGHA 
cs: MOV RO. (Re) WRITE USER CONSTANT INTO ADDRESS 
MOV (R2)+,R3 “GET DATA WRITTEN 
CMP RO,R3 “CHECK DATA 
BEQ 6$ 
HLT -REPORT ERROR 
6S: TST ~(R2) “RESTORE ADDRESS 
BR S$ -LOOP BACK 
.EXTAD: .WORD 06 “CONTAINS EXTENDED ADDRESS BITS 
SBTTL PROGRAM SUBROUTINES 
"SBTTL RELOCATION ROUTINES 
-ROUTINE TO RELOCATE PROGRAM CODE 
RELOC: MOV (Ro)+ RO GET FROM 
MOV (RS) Re -GET TO ADDRESS 
MOV R2. Ro 
ADD #17776,R3 >MOVES 4K 
MOV B4S,dHERRVEC  ;SET TIME OUT TRAP 
CLR RY ‘CLEAR RELOCATION SUCCESSFUL INDICATOR 
TST (R3)+ “CHECK IF MEMORY IS AVAILABLE 
1S: MOV (RO)+, (R2)+ :RELOCA 
CMP Re, R3 ‘RELOCATION COMPLETE? 
BNE 1$ 
MOV (RS).R3 
25: CMP R2,R3 
BEQ S$ ;BRANCH IF DONE 
CHP 5{RO) , (Re) ‘CHECK THAT DATA WAS RELOCATED PROPERLY 
1S RS “CHECK IF RELOCATING BACK TO 000000 
HLT ‘ERROR! CANNOT RELOCATE PROGRAM CODE 


- me +--+ oe oe 


ER eS = SS -ns-ss 
ST 





TEST eT O-124K MEMORY EXERCISER 


RELOCATION ROUTINES 


000754 


000170 
006766 


172142 


oooco4 


eee ee eer Oe 
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;T0 UPPER MEMORY BANK PROPERLY 


HALT 
BR 25 : CONTINUE TING AT YOUR PERIL 
3S: HALT tERNOR? E ANNO? RELOCATE CODE BACK TO 
- -TO OOOO00 PROPERLY 
us: CMP (SP)+, (SP)+ sRESTORE STACK PTR 
HOV WRELOCE Re ;GET BODRESS OF RELOCATION FACTOR 
MOV (RS)4, (R2) j RELOCATED RELOCF NOW CONTAINS RELOCATION 
RTS S ‘RETURN, R4=-1 IF NO RELOCATION 
-ROUTINE TO RELOCATE PROGRAM CODE FROM ORIGINAL POSITION (0-4K) TO 
: TOP OF MEMORY. 
beroc #20000, RO -SET UP TO SCAN FOR TOP OF MEMORY 
* Moy #ERRVEC+2, JHERRVEC 
1S: ADD #20000, R0° -T SCAN ADDRESS 
SEC -SET TIME OUT INDICATOR 
TST (RO) “CHECK FOR EXISTANT MEMORY 
Bcc 1$ -?C? WILL BE CLEAR IF MEMORY EXISTS 
MOV #ERRTRP, JSERRVEC’ 
SUB 820000, RO sADJUST TO LAST EXISTANT 
MOV RO, 2S "PASS RELOCATION ADDRESS 16 RELOC ROUTINE 
JSR RS, RELOC - RELOCATE 
000000 : FROM ooo000 
25: -WORD OO :T0 4K 
ISR RS, SPRINT :GO TO PRINT ROUTINE 
MOV 2$,-(SP) -PASS TO O2A ROUTINE 
ADD SREL24K,(SP) § :SET UP RESTART ADDRESS 
JSR PC. 02A -TYPE RESTART ADDRESS 
MOV (SP) 3S RETURN AODRESS IN 3% BELOW 
ADD 25. SP “RESET STACK PTR 
MOV (PO}+, (SP) “GET RETURN 
3S: .WORD 0 “CONTAINS RETURN PC 
ADD 25, (SP) T RE 
RTS pC 
.SBTTL PARITY ERROR 
- WHEN A PARITY R Is “DETECTED This ROUTINE. SCANS MEMORY FOR THE AD- 
“DRESS CAUSING THE PAR S IS LOCATED THE ROUTINE 
;HALTS WITH THE uae IN a NONTINLE OE RETER THE ERROR PRESS CONTINUE. 
PARSRV: MOV -SAVE RO IN SAVRO 
MOV #SAVRO+2, RO 
MOV R1, (RO)+ 
MOV ’(RO)+ 
MOV R3, (RO)+ 
MOV RY, (RO)+ 
MOV RS, (RO)+ 
JR RS’ SPRINT :GO TO PRINT ROUTINE 
LR (PC)+ :CLEAR PARITY ERROR INDICATORS 


weer oe ee 


——— « 


TEST DDQAB-A O-1e4K MEMORY EXERCISER 


OD@ABA 


RRR 
RLOHA 


KRG 
8 


geo ORS SOO ONIONS NSS Se sSNes 


e740 


-Pll 


sivgit- 
frase 


007034 
007042 


PARITY ERROR SERV 





ostse4 


WON 


006730 


172104 
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ICE ROUTINE 
LG: .BYTE O :NOT 0/0 =PAR ERR/NO PAR ERR 
LG: ‘Byte 0 : NOT B/D=PAR cre TED/NOT DETECTED ON SCAN 
000114 82$, JSPARVEC . SET Ri Y T 
000004 HOV #48, dERRVEC -SET TI VECTOR 
TST MMAVA ;CHECK IF MEM AVAILABLE 
BO 1$ cH IF rT VAIL BOLE 
TRC Sek 1 ‘ALLOW F ct ie 
p002s0 Oa 0, drMVEC youn a att PRE eee Toe 
18: ey ai + 
2s: OVA oP PEFLG -SET PARITY ERROR FOUND INDICATOR 
HLT , ee. ts ADORESS+2 IS IN Re DATA 
RTI cad fe 
3S: NOP © EXAMINE PARITY REGS 
CLR PEFLG oy ICATORS 
HOV . 8STKPTR, SP a PTY 
JSR PC, . MAME PAR DETECTION 
INF aPERSTRT OTE BROCRAR 
. SERVICE INE IF PARITY ery T SCAN 
ize aH LG : ET ERROR WAS 
BNE ; TED ON 
HOV 4 (SB) ,R2 ; fT TIME OF ERROR 
MOVE ’ PENFLG SET T IND = NO PAR ERROR DETECTED ON SCAN 
IR RS; SPRINT GO TO PRINT ROUTINE 
HLT sERROR! PARITY ERROR NOT DETECTED ON SCAN 
THE BELO 6 worse CONTAINS THE SAVED CONTENTS OF RO-RS WHEN THE 
SAVRO: .WORD 
sive: eb 0 
SAVRY: .WORD OC 
SAVRS: .WORD OO 
os PARERR: .ASCIZ <15)><12>’PPAITY ERROR’ <15><12> 
000 
043040 NOFIND: .ASCIZ ‘NOT FOUND ON SCAN’<15><12> 
Ba ot 
EVEN 


sROUTINE TO sr176100 ERROR MEDORES GN pee. ot cont menonte? 


T PARITY REG 


PARC ER 
;PARITY ERROR. INTERRUPT VECTOR ADDRESS 


PARVEC=11 


et ——— — 


oo —_-‘—— a oe - 
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Sass 
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ROUTINE 
177570. MAMF: BIT ice K IF PAR TY Alibe 1s 10 TO 
V 
000004 V +2, aaenevt Fee TO ig. Perum (VIA RTI) 
000114 HOV FI PARIT VECTOR 
900116 V C+e2 SE ot 
HOV OOF ge REGISTER 
CLR (Pi)+ “CLEAR AVAILABILITY INDICATOR 
PARAVA: .WORD 0 “CONTAINS AVAILABILITY INDICATOR 
-ENABLE ALL AVAILABLE PARITY sera 
{s: SEV OUT INDICATOR 
MOV , (RO)+ T IF AVAILAGLE 
BVS TY AVAILABLE 
BIS ea ioe AVAILABLITY INDICATOR 
28: ast -SHIFT INDICATOR 
MOV (SP)+, QBERRVEC ;RESTORE ERROR TRAP VECTOR 
DISPAR: RTS PC : RE TURN 
INES 
j ROUT INE nce THITHAL IDE ENORY NERAGENENT REGISTERS 
g ale 
172300 $177%256.-400+UP+RW,3SKIPDRO :SET KIPORO=RW UP 177 BLOCKS 
172302 NO ““HOO4+UP+RW,@8KIPORI § :SET KIPDRI=RW LP 200 BLOCKS 
172344 a aK 
172316 MOV .-400+UP+RW,DSKIPDR7 ;:SET KIPDR7=RW UP 200 BLOCKS 
172342 st 
172356 MOV O98 
177572 HOV l,@ ENABLE MEM MGMT 
18: RTS PC 
VETO: ese Ret “i 
172342 : TO NEXT 
Digan INSTRUCTION THAT 
: MEM MGMT 
177572 : MEM MGMT 
:CAUSED THE ABORT 
ie NGHT A ABORT SERVICE abr WRITE DOWN 
AMABTI: -RESET Re 
172342 CUB 8200, SbeiPAR! 
BEQ 2g 
MOV ee (SP) 
177572 NOV  38SRO ‘ENABLE MEM MGMT 
es: 
CLR a#SRO “DISABLE MEM MGMT 
poocse2 BIS #V,2(SP) 


——— ~~ eo ae - 
LLL LAL ALLL AAP. 
—-_—— <a il et. Al te el: CCl Lt 














TEST DOQAB-A O-124K MEMOSY EXERCISER  MACY11 27(732) 10-SEP-76 10:35 PAGE 68 
OD@ABA.P11 MEM MGMT ROUTINES 
ara" 007340 909002 RTI 
“ROUTINE TO SET UP MEMORY MANAGEMENT FOR PATT 
S44 po7a42 00702 STMMe : 15) BE reheck i eSTiN c' Bini ¥ 0 
a ane “ 
171400 vA 
l BNE 1$ ence IF MEM MGMT AVAILABLE 
2804 007354 ROR Re “ADJUST ADDRESS 
oats ROR Ro 
ROR Re 
2807 ROR Ro 
2808 RTS PC : RETURN 
ES TG 007365 004767 177554 1s JSR PC, LDMMO -GO MAKE INITIAL SET uP 
281i SWwAB.SOtéRR? 
2812 ROR Re 
2813 j 172344 MOV eK IPAR2 
2814 o0d200 ADD 
2815 007406 010237 172346 MOV bKIPAR 
2816 OO74le Ole737 O77406 172304 MOV .-4O0+UP+RW,J8KIPDR2 § :SET KIPDR2=RW UP 200 BLOCKS 
2817 pore D127 37 077408 172306 MOV -“400+UP+RW, a8KIPORS § :SET KIPDR3=RW UP 290 BLOCKS 
2818 172310 CLR ask 
2819 O07432 912702 o40000 MOV 
x Oi 007454 000250 MOV g ,SaIRIVEC 
1 000001 177572 MOV a1,a sENABLE MEM MGMT 
000207 2s: RTS 
2823 
2824 -ROUTINE TO SERVICE 8 XOR 13 ABORTS 
2825 007454 o00e40 AMABT2: NOP 
2826 007456 Ole7de o40000 MOV ea aioe 
2827 007462 062737 OOO400 172344 ADO bKTPAR2 
2828 007470 062737 OOO400 172346 ADD _ 
228 oo7476 013716 177576 MOV TURN TO TG INSTRUCTION THAT ABORTED 
012737 O00001 177572 MOV ‘PRngtE HEN 
2831 007510 ocdd0De RTI 
ee TTL 1 XOR 
oe34 : ROUT INE whi non § sworsT Case pose Starr 
“CALL: MOV $F) TING DENK ® ON THE STACK 
2836 , MOV BLKCNT -PUSH 128. WORD BLOCK COUNT ON THE STACK 
2837 : JSR BLKCNT - (SP 
oo 007512 916603 ooc0ne .1X8: MOV (SP). R3 GET a OF 128. WORD BLOCKS TO WRITE 
Seu) baveee east jo $85 Set UP MEN MCNT. 
2e42 0075e6 012700 177777 1S: MOV e-1 RC SET UP UTA REGISTERS 
2643 90753 010005 MOV RO,RS 
seus 005105 COM 
28% 007536 005100 25: COM RO 
2847 007540 005105 COM RS 
2e48 007542 012704 OO00IC MOV #8. .R4 -SET 128. WORD COUNTER 
22uG bo7ad6 010022 33: MOV RO, (R2)+ :WRITE 128. WORDS 
2850 010S2e MOV RS; (Re)+ 
2851 007552 010022 MOV RO; (Re)+ 
2e52 907554 910522 MOV RS’ (Re)+ 


TEST bOgAB-A 0-124K MEMORY EXERCISER MACY11 27(732) 10-SEP-76 10:35 PAGE 69 
DD@ABA.P1! 1 XOR 8 ROUTINES 
2853 
ose 907556 010022 MOV RO, (Re) + 
610522 MOV RS’ (Ro) + 
2956 007562 010022 MOV RO’ (Re)+ 
2857 007564 010See2 MOV RS’ (Ro)+ 
9 l MOV , (Re)+ 
e8e0 Bo78h0 Bi be33 Noy (RB) 4 
i 60 01002 MOV RO’ (Re)+ 
2862 007574 010522 MOV RS) (Re)+ 
4 Of V , (Re)+ 
Ssec poveOs OLOSeS NOY ORS CRED 
2866 G07602 010022 MOV RO’ (R2)+ 
2867 007604 010S2e2 MOV RS’ (Re)+ 
23 005304 DEC RY -DECREMENT 128. WORD COUNTER 
POET 001356 BNE 3$ 
2871 O076l2 05302 DEC R3 -DECREMENT BLOCK COUNT 
ses rei les my fe 
16 Glebis MOV (SP)+, (SP) SADJUST STACK 
2874 007620 Ole616 MOV (SP)+' (SP) 
e875 007622 o000207 RTS PC -RETURN TO CALLER 
2877 -ROUTINE TO CHECK 1 XOR 8 PATTERN WRITTEN ABOVE 
2878 “CALL: MOV BANK 8,-(SP) | ;PUSH STARTING BANK ® ON THE STACK 
2873 BLKCNT -(SP)  ;PUSH 128. WORD BLOCK COUNT ON STACK 
2880 JSR ,.. 1x8 
282} 
288 007624 _1X8: NOP 
007626 004767 002120 JSR PC, CKSUR :GO CHECK SWITCH REGISTER 
2B84 O076s2 016667 O0O002 171116 10$:  ## MOV 2(5P) COUNT - GET BLOCK 
2885 00764 016602 oOc004 MOV 4(5P)’Re “GET STARTING BANK 8 
seer boveso «pesos ih RR STIR "EORD 
1$: LR T WORD 
ogee 007652 005767 171066 TST ICOUNT *IF BIT 15 OF ICOUNT =1 THEN PATTERN 
2889 007656 100401 BM] +4 -1S 
2890 007660 005100 COM RO : WORD 
2891 007662 012705 oocc40 2s: MOV 832. ,RS “SET leg. COUNTER 
cass Bos 007666 005100 35: COM RO 
2894 007670 Ol2203 MOV (R2)+,R3 -GET TEST DATA 
Peas, 72 920003 CMP RO.R3 ‘COMPARE WITH CHECK WORD 
28% 74 O00] BEQ +10 
2897 007676 OOSO46 CLR -(SP) -PUSH FAKE STATUS ON THE STAC 
2898 007700 004767 171270 ISR PC, ERROR “ERROR! MEM DATA (R3) NOT = SEST para 
2699 (RO), ADDRESS=(R2)-2 
Soot 005100 COM RO 
2992 007706 012203 MOV (R2)+,R3 -GET TEST DATA 
2903 007710 Oe0003 CMP RO -R3 COMPARE WITH CHECK WORD 
2904 007712 001403 BEG 410 
2905 007714 OOSO4E CLR ~(SP) :PUSH FAKE STA STATUS | ON THE STACK 
2906 007716 OO47E7 171252 ISR PC ERROR M DA = TEST DATA 
507 : (RO), ADDRESS = (Re) a aa 


| “TEST we O-124K MEMORY EXERCISER MACY11 27(732) 10-SEP-76 10:35 PAGE 70 


ODGABA.P 11 1 XOR 8 ROUTINES 


909 0077 l COM RO | 
ts Bored 13208 SY PRs a .GET TEST DATA | 
e311 007726 920003 CMP RO R3 ‘COMPARE WITH CHECK WORD , 
54/5 Bass 38 ppd due ER -(SP) -PUSH FAKE STATUS ON THE STACK | 
2914 007734 OO4767 171234 JSR PC ERROR ‘ERROR! MEM DATA (R3) NOT = TEST DATA | 
2315 -(RO), ADDRESS=(R2)-2 | 
5318 o77uo 005100 CoM RO | 
2918 007742 Ol22e03 MOV (R2)+,R3 -GET TEST DATA 
2919 og77ua CMP RO.R3 °C WITH CHECK WORD | 
2920 l BEQ +10 , 
2921 007750 CLR -(SP) PUSH F “STATUS ON THE STACK 
2922 007752 004767 171216 JSR PC ERROR -ERROR! MEM DATA (R3) NOT = TEST DATA | 
2923 - (RO), SS=(R2)-2 | 
pec RS ;DECREMENT 128. WORD COUNTER | 
1342 BNE | 
100 COM RO -COMPLEMENT CHECK WGRD : 
2928 007764 005367 170766 DEC COUNT -DECREMENT BLOCK COUNT 
2929 007770 001334 BNE 2g | 
5330 B02 000004 MOV 4(SP).Re -GET BANK # | 
l 177340 JSR PC. STMMe | 
932 010002 O16667 O00002 170746 4S: MOV 2(SP) COUNT -GET # OF 128. WORD BLOCKS TO COMPLEMENT : 
sen flaele Tees a ig 
l BVC 10$ 
2935 SOS: MOV 832. RS 
cs: COM (Re) “COMPLEMENT PATTERN 
COM (Re)+ 
l COM (Ro)+ 
2939 005122 COM (R2)+ 
2940 005305 DEC RS 
2941] BNE S$ 
2342 Ol 005367 170714 DEC COUNT 
see Bm GOEIe? s7oer Gun 
2945 pt bso 001270 BNE 10$ 
2946 O100S2 012616 MOV (SP)+, (SP) 
2947 010054 012616 MOV (SP)+: (SP) 
one 910056 900207 RTS pc 
2950 .SBTTL 3 XOR 9 ROUTINES 
2981 ; ROUT INE 10 WRITE 3X0R9 WORST CASE NOISE TEST PATTERN | 
2952 #,-(SP “PUSH STARTING BANK ® ON STACK 
2953 ; MOV BLKCNT.-(SP -PUSH 256. WORD BLOCK COUNT ON STACK 
2954 JSR PC, . 3x9 “CALL ROUTINE 
2956 O10060 016602 ocOc004 .3X9: MOV 4(SP) Re :GET STARTING BANK 8 
2957 O10064 004767 177252 JSR PC, STAMe 
2958 010070 Oo0Sc00 CLR RO 
3908 91007¢ 010003 MOV RO,R3 . 
1 005103 COM 3 ‘RO (0) AND R3 (-1) IS THE DATA WRITTEN 
2961 010076 005767 173260 TST PARPAT “BRANCH IF PARITY MEMORY PATTERN IS 
e36e 010102 001402 BEG 1$ ‘NOT TO BE WRITTEN 
2964 O10104 012700 90040: MOV #401,RO0 «WRITE PARITY 3X9 PATTERN 
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1$: 


33: 


oe TO SET 
;PARITY 


-XOR39: ‘BIT 


JIS]: 


BIT 
BES 
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#16.,R4 


m0; (as , 


RO’ (Reds 


Ra’ im 
R3, (Ro)+ 
R32; (Re)+ 


sEACH LOOP WRITES 256. WORDS 


;BRANCH IF PARITY MEMORY PATTERN IS 
:NOT TO BE WRITTEN 


;GO GET CONSTANTS 
:DECREMENT 2S6. WORD BLOCK COUNT 


-ADJUST STACK 


CONSTANTS FOR WRITING/CHECKING 3 XOR PATTERN WITH 


#10, Re 
3150 


#1000,Re2 


3NOT4 


; CHECK BIT 3 

HIF Bit 3=6 
CHECK "eit 

‘BRANCH IF BIT 9 =0 


TEST DOQAB-A O- 
OD@ABA. P11 


3007 


2 


rateta 
0 p= be 
'fue-& 

Le | Lo | 

— 

? 


ee K MEMORY a 
XOR 9 ROUTINES 


000407 
032702 
001404 
005767 
100004 
100410 
00S76§7 


001900 
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17047e 
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BR 
.3ISO: BIT 
BEG 
.3NOTS: TST 
BPL 
BMI 
3189: TST 


10-SEP-76 10:35 PAGE 72 


. 3189 

#1000, Re ;CHECK BIT 9 

. 3189 ; BRANCH iF 0 

ICOUNT ;CHECK IF NORMAL OR COMPLEMENT DATA 
LOCOMP ;GO LOAD COMPLEMENT CONSTANTS 
LDNORM ;GO LOAD NORMAL CONSTANTS 

ICOUNT ;CHECK IF NORMAL OR COMPLEMENT DATA 


TEST eT O-124K MEMORY EXERCISER MACY1L1 27(732) 10-SEP-76 10:35 PAGE 73 
ODQABA . P 3 XOR 9 ROUTINES 


3014 o10252 100005 BPL LDNORM :GO LOAD NORMAL CONSTANTS 
3015 010254 O12700 177777 LDCOMP: MOV #-1,RO ‘SET COMPLEMENT CONSTANTS 

3016 019260 012703 000401 HOY s40l,R3 

pte See iia 000401 LONORM: MOV #401,R0 TEP NORMAL CONSTANTS 

3019 010272 012703 177777 MOV #-1,R3 

3020 010276 900207 RTS PC 

3022 “ROUTINE TO CHECK 3 XOR 9 WORST cf air PATTERN 

3923 “CALL: MOV #8. -(SP) BANK 8 ONTO STACK 
3024 ; MOV LKCNT. -(SP) K COUNT 


3=5¢ ; JSR PC... 3x9 ia ROUTINE 


TEST We O-124K MEMORY EXERCISER MACY11 27(732) 10-SEP-76 10:35 PAGE 74 
DDGABA. P11 3 XOR 9 ROUTINES 


7, @ ..3X9: NOP 
3 pte Matate 901444 WSR PC, CKSWR -GO CHECK SWITCH REGISTER 


3030 ;CHECK WORST CASE PATTERN 


TEST wy O-124K MEMORY EXERCISER MACY11 27(732) 10-SEP-76 10:35 PAGE 75 
DOGABA.P11 3 XOR 9 ROUTINES 


3031 010306 016604 000002 1$: MOV e(SP),R4 ;GET 256. BLOCK WORD COUNT 


TEST DOQAB-A O-124K MEMORY EXERCISER MACY11 27(732) 10-SEP-76 10:35 PAGE 76 
ODQABA.P 1: 3 XOR 3 ROUTINES 


3032 010312 01660e 900004 MOV 4(SP),Re ;GET FIRST BANK # 


4 


TEST wie O-124K MEMORY EXERCISER 
DD@ABA.P11 3 XOR 9 ROUTINES 


3033 pies 004767 177020 
3034 01032 
3035 010324 005767 170414 


MACY11 27(732) 


10-SEP-76 10:35 PAGE 77 


PC,STMM T T 
Ry SET EHECK WORD 
ICOUNT ‘IF ICOUNT IS NEG AM CHECKING COMP- 


—_——o ie eed _——— sw eee 


TEST DDQAB-A O-124K MEMORY EXERCISER MACY11 27(732) 10-SEP-76 10:35 PAGE 78 
-Pll 3 XOR 39 ROUTINES 
3036 010330 100001 BPL +4 ;LEMENTED PATTERN 
3037 O1033e 005100 COM RO F Com Le NT CHECK WORD 
010334 Q12705 000100 eS: MOV #64. ,RS »SET ‘ COUNTER 
3040 010340 005767 173016 3$: TST PARPAT sBRANCH IF PARITY MEMORY PATTERN IS 
3041 010344 00140e BEQ 30$ ;NOT TO BE CHECKED 


— ee ee ee -—— _< -<- 


TEST DDQAS-A O-124K MEMORY EXERCISER MACY11 27(732) 10-SEP-76 10:35 PAGE 79 
| Pil 3 XOR 3 ROUTINES 






010470 004767 176646 JSR PC, STHM2 GO SET UP REN Mir MGMT "IF REQUIRD 
: CHECK WORST CASE BIT COMPLEMENT PATTERN 
Ol 005767 170242 ist ICQUNT -CHECK IF COMPLEMENT PATERN 


1 005100 COM Ro -C CHECK WORD 

Bt DEbe 01 000100 4S: MOV 864. RY ig i | bere ORD ¢ NTER 

010Si2 Ol 000004 cs: MOV 84,R5 “SET 4 WORD COUN 

010516 005767 172640 6S: TST PAAPAT ‘BRANCH IF PARITY REMORY PATTERN IS 
0105¢0 001402 BEQ 0S -NOT TO BE CHECKED 

767 177462 JSR xORS9 

910530 O12203 60$: MOV (Rb) -GET DATA 


DOGABA. 
eae he 004767 177640 -, JSR PC, .XOR39 GO GET CONSTANT 
3045 O01 012203 "MOV (RE)+,R3 ‘GET TEST DATA 
Ol 13¢ CMP RO.R3 “C WITH CHECK WORD 
8 1035 l BEQ +h 
3048 010360 CLR -(5P) pe af STATUS ON THE STACK 
010362 004767 170606 JSR PC, ERROR eT (RQ) NOT = TEST DATA 
FRO (Re)}-2 
30S2 010366 012203 MOV (R2)+,R3 :GET TEST DATA 
3053 919370 CMP RO,R3 -C WITH CHECK WORD 
3054 Ol 1 BEQ + 
3055 010374 CLR -(5P) PUSH STATUS On THE STACK 
3056 010376 004767 170572 JSR PC, ERROR R3) NOT = TEST DATA 
: (RO), Tere -2 
Ea 010402 012203 MOV (R2)+.R3 -GET TEST DATA 
3080 D104 003 CMP RO R3 :C WITH CHECK WORD 
Ee] SG RFR +1, -PUSH FAKE STATUS ON THE STACK 
3063 O104i2 767 170556 JSR PC, ERROR ; ERROR! TA Ai) NOT = TEST DATA 
as O10416 012203 MOV (R2)+,R3 -GET TEST DATA 
3067 Ql 920003 CMP Rd R3 “COMPARE WITH CHECK WORD 
8 Ht ait: +10, -PUSH FAKE STATUS ON THE STACK 
3070 O10426 004767 170542 JSR PC ERROR ERROR! MEN DATA (R3) NOT = TEST DATS 
cal - (RO), =(R2)-2 
3073 
3074 O10432 005190 COM RO : CHECK WORD 
3075 O10434 DEC RS : DE 255. WORD COUNTER 
ae tite Sie sf ‘ cx soe 
3078 Ol DEC RY ‘BCCRERENT BLOEK COUNTER 
3079 O1ON44 001333 BNE 2$ 
os : O104%6 032737 O40000 177570 BIT s40000,38SWR §_ ; LOOP_ON TEST? 
see pitie: Gutee? goooe 170272 40S: HOV  2¢SP), COUNT ST he iF SB. WORD BLOCKS. 10. CHECK 
er BI DNeN Bieeoe 50000 ; NOV Step) Ree ; T a TART 
3088 
3089 
3090 
3091 
2092 
3093 
3004 
3095 
2096 
2097 


_ TEST DOQAB-A ot MACY11 27(732) 10-SEP-76 10:35 PAGE 80 





DD@ABA.P11 
3098 010532 CMP RO.R3 “CHECK DATA 
3099 Ol BEQ 419 . 
l l CR (SP) 
1 l PC, ERROR 
Be SPLEEN PSY tt 
3103 Ot 546 COM -(R2) T TEST DATA 
310% O10SSC MOV (R2)+,R3 
310S Ol CMP RO.R3 ero 
3106 OQ) Ree .+ 
3107 Ol cL ~(SP) :PUSH FAKE STATUS ON THE STACK 
l l PC. ERROR 
3110 OL Kom BCRED Oe TATA ck WORD 
3111 oltre DEC es :RES TORE, 0 SWORD COUNTER 
3113 O10S76 con CORD 
38 1060 DEC RY GECRERENT 2st. WORD WORD COUNTER 
3116 O1 COM RO :C CHECK WORD 
HS Bite i cea 
3118 1061 BNE 4§ 
3120 o1 14 MOV 4(SP) -GET BANK 8 
3lel Ol JSR 
3l22e Ol MOV 2(SP) R93 -GET BLOCK COUNT 
3123 Ol BIT ,a8SWR = :LOOP ON TEST 
3124 010636 BNE 40§ “BRANCH IF LOOP ON TEST 
3125 O10640 ASL ICOUNT 
3125 O10644 BYC l 
3127 O10646 7$: MOV . RS -COMPLEMENT PA 
3128 O106S2 10$: MOV (R2}_RO -GET FIRST DATA 
2129 010654 MOV 10(R2). RY “GET FIFTH DATE Ne 
3130 O10860 MOVB RY, (Re) :SWAP ld 
313! Ol10662 MOVE RY: {RD)4 tWITH S- 


gO - - 
- ——< i el 


DO7~ 


10-SEP-76 10:35 PAGE 81 
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3 XOR 9 ROUTINES 


_ TEST DOQAB-A O-le4K MEMORY EXERCISER 


 ODGABA.P11 


ee ee EE Oe 


UK 


~ 
' 


TO CHECK ON THE S 


eh 
§ beg 85 6? 
i ¥ 5 "> - 5 
: “ g _ 
ae tt te 
“ z zo S32 = Eee 2 e85 
. “Hos x 3 wi, ae 
= 6 . 
+etteeoeeeeeee+e ++ aa, = 2 + a0. = ae 
cezezisestvsseetor Study ETS Mot efosoeumantty 2 $8: 
2 & 
PEESrreeerusie PUREE “HBSN BRAGRESSSURUENRESE © SBF 
_ 3 o  . 
£ 28 8 was 25 


Lb 
- 


OE dd ed ed nd Od ed og 4 of Oo 
AE nd Od OM Od mad Od ond ong og od oe od 


ddaaaaReRSRSR Snes 


Oh OF nk nd kk md dd nd od od md od oh od 
QOQOOOOOOVOOOOO0O0000 


MAAR BOSS SST PPS PS Rin 


soaenaueeeeeeeag 
WSUS USS ERE EERE 


_ Ed nh ed a ed dd ag md ed ed Od wg wt tw 
oO ONOOOOOCOCOOCOOO0O0O00O 
if 
™~ 


010730 005767 170010 


kd hk ad nd ak ad nd ad nd ad Od od wd wd wd 4 at 
MMOMMMOMMMOMMMMMMMMCMMMOlI™) 


3162 
3163 


SS SASSER RR CERE REE eeeeeee 


- er 
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009A89.P11 8 XOR 13 ROUTINES 
3188 
3189 911026 ..8X13: NOP 
31530 O11 os Pe? 000716 ISR PC CKSUR 360 CHECK SWITCH REGISTER 
3193 BONO Beebe 10$: MOV Wey Re Bet 2 , 
3193 011044 004767 176272 JSR PC ST ‘GO SET MEM MGMT IF REGUIRED 
3134 011050 016667 O00002 167700 MOV 2(§P), COUNT ‘GET § OF 4K BANKS TO CHECK 
3196 011056 012704 o00040 1S: MOV 32. ,R4 -SET 4K WORD COUNTER 
3197 011062 905100 2s: COM RO -C T TEST 
3138 011064 012705 000100 MOV #64. , RS ‘SET 128 WORD COUNTE 
3200 011070 33: 
3201 O11070 012203 MOV (R2)+,R3 -GET TEST DATA 
3202 011072 oe20003 CMP RO.R3 ‘COMPARE WITH CHECK WORD 
3203 011074 001403 BEQ +10 
3204 011076 O0SO4% CLR -(5P) :PUSH FAKE STATUS ON THE STACK 
3205 011100 004767 170070 JSR PC, ERROR : ERROR! DATA (R3) NOT = TEST DATA 
3206 : (RO), SS=(R2)-2 
Ea 011104 012203 MOV (R2)+,R3 -GET TEST DATA 
3209 011106 Oe0003 CMP “COMPARE WITH CHECK WORD 
3210 O11110 901403 BEQ +10 P 
3211 Ollile OOSO46 CLR ~(SP) -PUSH FAKE STATUS ON THE STACK 
3212 011114 004767 170054 JSR PC, ERROR “ERROR! MEM DATA (R3) NOT = TEST DATA 
#213 (RO), ADORESS=(R2)-2 
3215 011120 005305 DEC RS :DECREMENT 128 WORD COUNTER 
3216 Olll22 001362 BNE 3$ 
3217 011124 O6S304 DEC RY -DECREMENT 4096. WORD COUNTER 
3218 Ollles 001355 BNE 2 
3219 011130 005100 COM 0 
3220 Olll3e 005367 167620 DEC COUNT -ALL 4K BANKS CHECKED? 
3221 011136 001347 BNE 1$ 
11140 0 MOV 4(SP) Re -GET FIRST BANK ADDRESS 
3554 Stites pAaees ate JSR PC STMMe : GO cet UP MEM MGMT IF REQUIRED 
3225 011150 O16604 o00002 MOV aSP) RY “GET 8 OF 4K BANKS 
3226 011154 006367 167564 BSL count :SHIFT ITERATION PATTERN 
011160 001401 G 44 
eS Ott eS Tea 004050 40S ay ae RS T COUNTER 
pa Bt ites pier os 4g: COM eeoye: : REMPLERENT TEST RUSTE RN 
1 011172 O0Si2e COM (Re)¢ 
3232 011174 005305 DEC RS 
3533 blizen O0S304 BECO 
oe Bliss Obia70 BRE COS 
3236 011204 005100 COM RO -COMPLEMENT TEST WORD 
3237 011206 005767 167522 TST ICOUNT 
3238 011212 001312 BNE 10$ 
3239 O11214 Olee16 MOV (SP)+, (SP) 
3240 O1lel6 Olebie MOV (SP)+’ (SP) 
3241 Olleed 000207 RTS pC » RETURN 


3243 .SBTTL ROTATING 1°S & O'S ROUTINES 
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OD@ABA.P11 ROTATING 1°S 8 O'S ROUTINES 
3244 “ROUTINE TO CHECK ROTATING 'G’ BIT THROUGH FILD OF 1’S 
S ;CALL: V ANK#, -(SP) : ! ARTING BANK & 
; MOV KCN -(SP) : ’ BLOCK COUNT 
3547 hi , ROTO ‘CALL ROUI 
3249 Oll222 004767 O00S24 .ROTO: JSR PC. CKSWR -GO CHECK SWITCHES 
3250 Slieeé 016604 o0000e2 MOV 2($P),R4 K ORO BLOCK COUNT 
seet Oe DONDE? I7EIOO MR ORG STNG ee cet UP REN MONT CIF AVAIL 
25 5 1538 ness 178100 MOV e-1,RO fae bon 
3255 O0112% 012705 oo0400 1S: MOV 8256. ,RS -SET 256. WORD COUNT 
358 01 1es¢ 1 2s: cLC ‘CLEAR CARRY BIT IN PSW 
O11 ae? 000124 JSR PC. ROTATE 
3258 011260 016203 177776 V -2tR2),R3 -GET RESULT 
3560 OLISEe |Ge0003 Bee. feck Result | MS SET 
Be Otteee OOLNaS a 
3262 011272 DOSdHe 3S: CLR -(SP) -ERROR! COULD NOT ROTATE ’0’ SIT 
3263 011274 767 167674 JSR PC ERROR - THROUGH ADDRESS IN Re 
3264 911300 4g: DEC RS -DECREMENT 256. WORD COUNT 
3265 O11 001363 BNE 2 “LOOP UNTIL 
3265 011304 005304 DEC RY -DECREMENT 256. WORD BLOCK COUNT 
3267 011306 001357 BNE i$ “LOOP UNTIL DONE 
3268 011310 Ol2616 MOV (SP)+, (SP) -POP CONSTANTS OFF THE STACK 
3269 Oll3le 012616 MOV (5P)+’ (SP) 
3270 011314 000207 RTS pe :RETURN TO CALLER 
3272 -ROUTINE TO CHECK ROTATING °1’ BIT THROUGH A FIELD OF 0’S 
3273 “CALL: MOV BANKS. -(SP) -SET STARTING BANK 8 
3274 : MOV BLKCNT.-(SP)  :SET @ OF 256. WORD BLOCKS TO CHECK 
3275 : JSR PC, .ROT! “CALL ROUTINE 
3578 011316 004767 000430 -ROT1: JSR PC, CKSWR -GO CHECK SWITCHES 
3278 Oli3e2e 016604 900002 MOV 2¢SP) RY -GET 8 OF 256. WORD BLOCKS To CHECK 
3279 011326 016602 op0004 MOV 4(SP) ‘Re “GET STARTING BANK 8 
3280 011332 004767 176004 JSR PC, STHM2 -GO SET UP MEM MGMT (IF AVAIL) 
3281 011336 CLR RO -SET CHECK WORD 
ae 011340 01270S 900400 1$ MOV #256. ,RS :SET 256. WORD COUNTER 
3284 O11344 2g SEC SET °C’ BIT IN PSW 
3285 011346 OO476 JSR PC, ROTATE -GO ROTATE *1’ BIT 
3286 O113S2 016203 177776 -2tR2),R3 “GET RESULT 
3287 011356 103002 BCC 3$ : F °c’ IS CLEAR 
3288 011360 C RO.R3 “CHECK RESULT 
3289 011362 O0140i BEQ .+4 _ 
3290 011364 104400 3g: HLT -ERROR! COULD NOT ROTATE °1° SIT 
3291 : THROUGH ADDRE R2 
3292 011366 005305 DEC RS :DECREMENT 256. WORD COUNT 
3293 011370 001365 BNE 23 . 
3294 011372 005304 DEC RY -DECREMENT 256. WORD BLOCK COUNT 
3295 011374 00136! BNE 1$ 
329% O11376 Oleblé MOV (SP)+, (SP) ;ADJUST RETURN ADDRESS 
3297 O11400 Oloblé MOV (SP)+, (SP) 
96 011402 000207 RTS PC “RETURN TO CALLER 
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TEST DDQAB-A O- 


DDGABA.P11 


TEN 


TT? 
ai 





SRSSESESESEEESEESES 


cS 
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ee ee ee ee ee Se Set et et ee el eee See See See? eet? See? 


CREMENT 256. WORD COUNTER 

GOP UNTIL 256. WORDS HAVE BEEN ie 
sPUSH STARTING BANK & ONTO STACK 
‘AND 256. WORD BLOCK COUNT 


;CALL ROUTINE 


y STARTING BANK 8 ONTO STACK 


:GO SET UP MEM MGMT IF REQUIRED 


-SET WORD COUNT 


;GO CHECK SWITCH REGISTER 


 ] 
6 
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® 
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GET USER CONSTANT 
T STARTING BANK 8 


°6 
‘ee 


eRe eHeH eH OBB eH eG eG eSee tH OHS te. CH SH oe oH 


PATTERN 


CTED PA 
OUTINE 
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PRISE RSA Resa an nndaesemete eae ona 


MOV #64.,RS 


eS: 


33ec 9115850 012705 000100 


— ee eee ee 
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- DO@ABA.P USER PATTERN ROUTINE 
3356 011554 3S: 
3357 O11554 012203 MOV (Re), R3 iGET TEST DATA 
3358 011556 CMP 0.R2° “C WITH CHECK WORD 
«BB BT tee BpSO4e ail: st) FAKE STATUS ON THE STACK 
| 3307 011564 Spares 167404 JSR PC ERROR ERROR! “? DATA (R3) NOT = TEST DATA 
| 3362 -(RO), ADDRESS=(R2)-2 
Be Rue? eee AS RSME PH vecx woo 
{ H 
| 33Pe Bt tesg Tartine BEQ +10 
| 3367 011576 OOSG46 CLR -(SP) :PUSH FAKE STATUS ON THE STACK 
| 3368 O11600 004767 167370 JSR PC, ERROR ERROR MEM DATA (R3) NOT = TEST DATA 
| 3353 , ADDRESS=(R2)-2 
| 
| 3a7i 011608 012203 MOV (R2)+,R3 “ way DATA 
- 3372 O11606 Oe0003 CMP RO.R3 ‘COMPARE WITH CHECK WORD 
| 3373 011610 001403 BEQ .+10 
| 3374 Oll6le OOSO46 CLR -(SP) -PUSH FAKE STATUS ON THE STACK 
' 3375 011614 004767 167354 JSR PC, ERROR ‘ERROR! MEM DATA (R3) NOT = TEST DATA 
| 337% -(RO), ADDRESS=(R2)-2 
3378 011620 012203 MOV (R2)+,R3 -GET TEST DATA 
3379 Olibee oe0002 CMP RO.R3 -C WITH CHECK WORD 
3380 011624 001403 BEQ +10 
3381 O11626 OOSO46 CLR -(SP) -PUSH FAKE STATUS ON THE STACK 
3382 011630 004767 167340 JSR PC, ERROR “ERROR! MEM DATA (R3) NOT = TEST DATA 
-(RO), AODRESS=(R2)-2 
35 =: 011634 005305 DEC RS -DECREMENT WORD COUNT 
3386 011636 001346 BNE 3$ 
3387 O11640 005304 DEC RY :DECREMENT BLOCK COUNT 
3388 O11642e O01342 BNE 
350 011644 032737 o40000 177570 BIT #4O000,a8SWR CHECK LOOP SWITCH 
3391 011652 001330 BNE 1§ “LOOP CHECKING THIS PA TTERN 
3392 O11654 006367 167064 ASL COUNT ‘SHIFT PATTERN INDICATOR 
3393 O11660 001325 BNE 1$ 
3304 O1l662 012616 MOV (SP)+, (SP) sADJUST STACK 
3395 O1I664 012616 MOV (SP)+) (SP) 
339 O11666 000207 RTS pc -RETURN TO CALLER 
3336 .SBTTL GET TTY INPUT ROUTINE 
3399 “ROUTINE TO GET ASCII INPUT FROM TTY,AND CONVERT TO OCTAL. 
3400 “ROUTINE LEAVES THE FIRST 16 BITS IN ADDRESS FOLLOWINTG THE CALL 
3401 “AND THE LAST 2 BITS IN .1617 BELOW. 
3402 “CALL: JSR PC,RECD 
3403 011670 RECD: | 
3404 011670 004767 166410 JSR PC, SSAVR :GO SAVE REGISTERS ON THE STACK 
3940S 011674 004767 002172 JSR PC’ TNUM 
3406 011700 010267 o0004e2 MOV Re, TEMP? 
3407 011704 010367 OOO04O MOV R3, TEMPS _ 
3408 011710 767 166414 PC’ SRESTR -RESTORE REGISTERS | ROM STACK 
3409 011714 011667 O00024 V (SP), TEMP! 
2410 011720 016777 O00024 ooonit MOV TEMP3, JTEMPL 
2411 011726 016767 O00014 900006 MOV TEMP2. . 1617 


~ re a rt re ee ee ee ee ee + —_- ~ ~ 
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eG? STBANK: .ASCIZ <15><12>°STARTING BANK #(8)? ° 
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BANKS: .ASCIZ <15><12>’s# OF 4K BANKS TO TEST(8)? ° 


= 
S 
S 
o 
GR 
ae 

R 82 
? 


PAT: ~ASCIZ <15><12>°PATTERN &? ° 
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3412 011734 062716 000002 ADD #2, (SP) 
3413 O11740 000207 RTS PC 

3414 ain rat +1617: 1 

Hg Lg TeMe A: 3 

3417 O11 000000 TEMP3: .WORD 0 

3419 sROUTINE TO CHECK THE SWITCH REGISTER 

3420 BRECK EU TTCH 9: IF SET [SAD ERROR COUNT INTO THE DISPLAY REGISTER; 
3421 -IF NOT SET, LOAD COUNT INTO oft SPLAY REGISTER 

3422 0117S2 O42767 017777 168770 &KSWR: BIC De LODISP : OCATION BITS 

3423 011760 032737 O00400 177570 BIT 88178, “CHECK SWITCH 8 

3424 011766 001402 BEQ 10$ ‘BRANCH IF 

3425 011770 004767 JSR PC REL 4K GO RELOCATE PROGRAM BACK TC 4K AND STOF 
3 O11774 001000 177570 10S: BIT ptt , a#SWR “SWITCH 9 SET ? 

3428 012004 OS6767 166736 166736 BIS ERCNT,LDDISP § ;LOAD ERROR COUNT 

354 EAE 166722 166726 1S Bis Fant I LOAD COUNT 

3431 5 Se 16737 166722 177570 2S: MOV TBDISP baB ISPLAY LOAD THE D{SPLAY REGISTER 

3432 012030 012767 040177 168706 MOV #040177, ICOUNT :LOAD ITERATION COUNT WORD 

34 01203% 032737 o04000 177570 IT 84000, a&SWR “CHECK SW11 

34 1 I Q +6 

3435 012046 105067 166672 CLR8 §- ICOUNT sICOUNT =O40000 IF SW11 =! 

3436 0120S2 000207 RTS pC 

3438 - MESSAGES 

3439 012054 OOS01S O47S24 OS1040 RESLDR: .ASCIZ <15><12>’TO RESTORE LOADERS START AT 162°«15)<12> 
3440 O01 051505 047524 O42S522 

3441 012070 O46040 O40517 O42S04 

3443 DISTON Deeiee | ONGHHD 

aya Oiette baseel OOoBdes D000I2 

3445 Ol2120 OOS01S 047105 O41 PARITY: .ASCIZ <15><12> ’ENABLE PARITY? 1/S=YES/NO ° 

sib Ol2le6 042514 OSO040 051101 

3448 

3449 

3450 

3451 

3452 

ee 

3455 
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3458 

3459 

3460 
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QUEST: Z ¢«15><12>°?’ 
CONST: Z <«15><l2e>’ TYPE CONSTANT’ 
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PRGHM: .ASCIZ <15)<12>’TYPE ADDRESS’ 


RELOCM: .ASCIZ <15><12>’TO RESTORE PROGRAM START AT ° 


BS TERLSK: O25° ‘e? 
ENDMSG: .ASCIZ ‘*DODQAB DONE!’ 


EVEN 
sROUTINE TO RELOCATE PROGRAM BACK TO 0 


PELE: W199 Ro 118 RELOGHTED 









a] 
MOV RO, 1$ FROM ADDRESS INTO SUBROUTINE CALL 
JSR RS: REL oc RELOCATE, CODE TO 
1$: . -LOWEST 4K 
MOV aSTKPTR, - SET PTR 
BIC #100000 *ELODISP BE oe RELOCATION INDICATOR 
MOV SeLDDISP 2 aaDISPLAY 38 DISPLAY REGISTER 
CLR JSRELOCF’ RELOCATION FACTOR 
SET MGMT 
38176 ioe A HALT AT 176 
IMP aeibe “RESTORE LOADERS & HALT AT 176 
: .SBTTL BRANCH GOBBLE MOS MEMORY TEST 
; HE£EEXPROGRAM DESCRIPTIONEHERH 


:THIS IS A PSEUDO-MODIF IED Mg OF THE BRANCH GOBBLE 


Biche eh fees 


-EXERCI tH 1S BRANCH 1S INCLUDED 
“HERE IN ite ORIGINAL FORM MEMORY MANAGEMENT 
ae GIVE IT OPERATING 


‘SBCTTIES Ina G-12eC Fs 


£EHEXOPERATING PROCEDURE 242% 


“WHEN LOADED THIS PROGRAM'S STARTING IS XXXXXX. 
; WHEN te THE FOLLOWING STEPS ARE TAKEN: 
A PROGRAM ID IS TYPED ON THE TTY: 








. BRANCH GOBBLE MOS TEST ee 
'1.5) THE PROGRAM DETERMINES IF THERE IS MOS PARITY. IF YES IT IS ENABLEL 


SS WHERE CODE 
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BRANCH GOBBLE MOS MEMORY TEST 


3524 AND THE USER IS TOLD. 


eS ~- 



















SUCCESSFULLY “GATHERED Hon THE USER, THE 


3625 '2.) THE USER IS ASKED: 

368 ; USE MEMORY MANAGEMENT? (Y OR N) 

3255 IF THE USER TYPES. THE MEMORY MANAGEMENT 

3529 : WILL THE TEST. IF HE TYPES 

3$30 : NT NOT BE 

3531 : IN T WILL 

3522 ; PERE UNHOD FIED ORIGINAL VERSION 

3533 

<5 Egret in eee 

3536 1 13 Des Reb 

x eis: gt A ipa 

3539 IN TO SSES 

3540 . Zs 3 

3541 . BE D 

3S42 -3.) THE UE 

3543 : FOR HIGH sis ee HE TEST: 

= : TI GH LIMIT: 

3546 : AND T 

ee : EF TE AM STi 

3549 BE SPECIFIED IN 

see : ING OF ioe BYTE 

3225 3 een 

3554 ; DRE SSE SS ealiie tema weer 

3556 ESSE' THE FOLLOWING CONDITIONS: 

3557 : 

= : 3 cee 

3ee7 i Pati ihe Be oe At RELoca RE 

3563 fat oar fice SHOULD BE GREATER 
5 t BE SPECIFIED BY 

3566 : Scrat A piel 

3367 ; F MEMORY 

3568 . 

3569 ° IN Meremre lane THAN 1 

3570 : IF ANY OF THESE CONDITIONS IS NOT NET. 

271 ; ie vase WILL BE ASKED TO rieut ANOTHER 

3673 NOTE THAT IF ANY, OF THE RODRESSES 1 IN THE TEST 

3575 - Pine our ERO WILL FROM iat 

3576 RECOVERY CAN BE MADE EXCEPT TO RESTART 

3577 EM fees STARTING ADDRESS. 

3578 :4, ) ON HAS BEEN 
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BRANCH GOBBLE MOS MEMORY TEST 


077406 


thing 
1406 
012746 


177562 
177600 
001520 
000131 
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000077 
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TEST WILL BEGIN. IF GRANCH COBBLE ENCOUNTERS 

; A MEMORY FAULT DURING THE Test THE 

; PROCES Le TED AT THE “LOCATION” 

:S.) AN 

Sebi oe ry were 

. MIL he TESTED a . 

:6.) ia eet 10. S10e The EST IN PROGRESS AND START 
T aera FE HE SHOULD HIT THE HALT 
SWITCH AND START THE TEST AGAIN ie 260. 

top: 

- CONSTANTS: 

- THIS ROUTINE T CARE OF THE IDENTIFICATION, 

-ASK THE USER IF 

sENABLED. AND & T UP FOR THE 


IVEN CONTROL. 


BELA ae 


BRANCH: CLR RELFL - INITIALIZE THE RELOCATION INDICATOR 
CLR ‘INITIALIZE THE MEM. MANAGEMENT 
JSR RS, SPRINT -GO TO PRINT ROUTINE 
WORD ORES 
JSR PC, 
158: JSR PC; MOSPAR 
JSR RS. SPRINT -GO TO PRINT ROUTINE 
.WORD MMMESS Henan MANAGEMENT SHOULD 
2$ ISTE gaTKs :WAIT FOR A CHARACTER. 
MOVB § a#TKB,-(SP) -GET THE CHARACTER. 
BIC #177600, (SP) 
JSR pc. TYPIt ae HO THE CHARACTER. 
TST (SP)+ SET T HE STACK. 
CMP #’Y,-2(SP) iT IT ay THEN GO 
BEQ YMMBGO : TO to ENABLE 
;MEMORY NANAGEMENT 
CHP #’N, -2(SP) ‘IS ITN 
MOV ¥’?, =(SP) -IF IT WAS NIETHER 
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OD@ABA.P1! GOBBLE MOS MEMORY TES 
3636 012646 004767 001466 JSR PC, [YPIT ;¥ OR N THEN ASK 
3627 O12b5¢ TST i.” ‘THE USER AGAIN. 
P35 pts P ee oe 001066 3$: BRR : LIMITS T THE bint ITING 
3640 i RODRESSES THE TEST. 
3641 ‘THEY Wd EP be BE LEFT AS 
3642 ‘BLOCK NUMBERS IN LOLIM 
oi 001600 001172 SPOT MP P HILIM jANO HILIF, 
4c Se «SPOT 
3646 177770 MOV ¥SPOT-. ,RO 
3647 ADD PC. RO 
3648 177772 ADD ¥-6, RO 
3649 MOV RO. -(SP) 
3650 001140 JMP LI 
3651 SPOT2: CLR -(SP) 
3652 002502 MOV SF IRSTI-. ,-(SP) 
Pay 77772 Ap av, CSP 
1 a-6. (SP) 
3655 000774 JSR Pc, LOSEGY 
000436 JSR PC‘ LOSEG 
3657 000052 REPET1: MOV #°% -(SP) 
3658 001372 JSR Pc. tyPIT 
3659 TST (SP)4+ 
3660 oog200 001104 CMP HILIM 
3661 BGE 3 
3662 001076 MOV HILIM.RO 
3663 o000S4 4g: JSR pc Rot 
3664 002556 MOV RO;H :SET THE PARAMETERS 
3665 “IN THE ACTUAL TEST 
3665 - ROUT INE. 
3667 012774 016700 001064 MOV "DO THE SAME FOR THE 
3668 *LOW ADDRESS LIMIT. 
36639 013000 767 JSR 
3676 O13004 010067 o02S44 MOV 
3671 013010 CLR iSET VECTORS 
3672 013014 012704 o000e “FOR AN I 
3673 013020 ADD “FROM A TRAP INSTRUCTION 
3674 013022 177772 ADD “WHICH WILL BE T0 
3675 0130e¢6 010437 MOV “RETURN FROM THE TEST 
3676 “ROUTINE WHEN IT IS DONE. 
3677 013032 RTI -START THE TEST 
3678 013034 004767 REPET3: JSR PC ,LOSEGe 
3679 013040 OO01E7 177672 IMP Tl 
3681 ‘THIS ROLIINE IS CALLED TO SHIFT RO TO THE LEFT SIX BITS. 
3682 013044 012701 177772 ROT: MOV #-6,R1 
3683 013050 006300 1S: ASL 
3684 013052 005201 INC Ri 
3685 013054 002775 BLT 1$ 
3686 013056 000207 RTS pc 
3688 ‘ VMMBGO SETS UP FOR USING MEMORY MANAGEMENT TO 
3689 ‘DO THE MOS TEST. 
3690 “ALL THE MEMORY MANAGEMENT REGISTERS WHICH ARE 


on 
= 


‘TO REMAIN STATIC FOR THE TESTS DURATION ARE SET. 
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ODQ@ABA.P11 BRANCH GOBBLE MOS MEMORY TEST 
3692 ‘Te WS ~ Me GOTTEN AND CHECKED FOR VALIDITY. 


34 Tg C CALLED.Y 1" IS TE TROUTINE the errs. THOSE 
cE DE Seat ST a He ee” 


} 
3698 013060 012767 177777 165664 YMNBGO: MOV #-1, MMAVA 
aa OLsbre b1e700 172340 te SP og 8 Rea ctbaaT® STATIC 
3701 Bt a7E Boot 172300 MOV SKIPORD’ Ri 
3702 013102 0605003 CLR R3 
3703 013104 012704 177770 MOV #-10,R4 
3704 013110 010320 13: MOV R3. (RO)+ 
3705 O13ile 000200 ADD #200, R3 
3706 Ol 11g 1 077406 MOV #KPDR, (R1)+ 
INC RY 
| 78 At aise Basco 000616 Bae b& cintts sGET THE L LINITS FOR THE PENDING 
| OCK NUMBER 
il :F WOTLIn AND L M, 
12 013132 004767 000570 JSR PC, LOSEGY a E ‘bot Is 
3713 ; “APPROPRIATE FOR THIS TEST SPAN. 
14 013136 01272? UO7600 172356 MOV #7600, 98KIPAR7 ;MAP UNIBUS DEVICE PAGE INTO 
1S INTO HIGH V MEMORY . 
3716 013144 oOSO46 | REPET2: CLR -(SP) 
3717 013146 012746 o022S0 MOV ac IRST1-. ,- (SP) 
| 3718 013152 060716 ADD (SP) 
| 3719 013154 062716 177772 ADD Ale (SP) -SET UP THE STACK 
| 3720 -TO SIMULATE THE OCCURRENCE OF AN 
| 3e AN INTERRUPT SO THAT THE TEST CAN 
| 3553 “BE STARTED USING AN RTI. 
3723 O13160 016767 000704 000674 MOV HISAV, HILIM 
3724 O13166 016767 000674 000670 MOV SAV, OLIM 
3766 013174 767 000174 JSR GI 
01 12746 MOV ek -(SP) 
3727 013204 004767 001130 JSR PC Fy IT 
| 3728 013210 005726 TST 
3729 Ol3ele 012737 013224 000034 MOV SYMMBG!, a834 
3730 013220 005037 o00036 CLR 3836 -SET UP THE TRAP INTERRUPT VECTOR 
3731 “WHICH WILL BE USED TO RETURN FROM THE 
373 “TESTING ROUTINE. 
333 M4 tL gt TS ery TOO PRO SEE ae ene PUB ARDS FROM THE en OL Ih _— 
3736 : ME MARIRGERENT. reer 38 ENBELE BRGOB TO WORK THROUGH AS 
3737 ;MUCH 0 OF i SPAN AS POSSIBLE IN A ASINGLE pliANAGENENT SET UP 
35 3 i BRGOB ALWAYS IS INL OE A MEMORY AND UPPER VIRTUAL 
370 ;ADDRESSES ARE ALWAYS MAPPED INTO UNIBUS DEVICE ADDRESSES. 
3742 013224 005037 177572 YMMBG1: CLR a#SRO 
3743 013230 026767 O00626 on0b26 CMP HILIM,LOLIM -IS THE TEST DONE? 
3744 013236 10145) BLOS ONIT S, THEN BRANCH. 
3745 013040 012700 172342 MOV #KIPARI RO tecee GET READY TO SET 
3746 0132044 016705 o00614 MOV LOLIM, RS :THE KERNAL PAGE ADDRESS REGISTERS. 
3747 013250 012701 177772 MOV #-6, Ri 


- ——— 
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Pil BRANCH GOBSL 


~ 


Aaa : 


ot i 7 20000 002272 
13270 CCOS&5 
[em 101907 

013276 905201 


013300 002770 


i33le 
13314 Bere? oo00s4e 002230 


Oe2beb 
000167 177550 


0003e4 
013400 Oeb7e7 O00%te 000200 
BR HY oon 
SR Be ABBES coon 
a 03004 
ia 012767 o00e00 000432 
BIRR HIRE coneoo cone 
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NOV REARS. 
RODD 


es: 
oss: CHP qe RS 


E MOS MEMORY TFST 


;RESET THE KIPAR’S 


coy 


see IF ALL THE 
BLT 1$ it ‘for BEEN SET SO 
MOV —sRS.-HI Beal aT 
: BEEN V RIA 
EEN Fae 
e se 
3S: MOV HI -D0 THIS IF ALL THE TEST SPAN HAS BEEN 
3 ALLOCATED TO THE VIRTUAL KERNAL SPACE 
ug: SUB LOLIM, HI COMPUTE t THE VIRTUAL LIMIT 
-OF THE TEST SPAN. 
MOB ren 
ADD 
MOV actano, 
MOV Shin 
INC a : TURN ON MEMORY MANAGEMENT. 
ATI : TO BRGOB TO 
Te Sa oleae 
‘BY THE : OF THE 
DONIT: JSR : 
*" Bfp He, re SP 
JMP sTEST £0 COMPLETED, SO 


tL OSEGI IS CALLED To DECIDE WHETHER OR NOT. THE LINITS ARE SUCH THA 

Vee Grins bieeetr enon 
ib CONTENTS. BE THIS) FIRS ock BF 
REST Con BE 


K BLOCK. IF IF RELOCATION T on Ts NECESSARY LOSEG! 


2 
“"IG> 


TS A ‘td | 1 RESETS THE LIMITS, LOLIM AND HILIN, 
OSEG1 * LOSFL ; INITIALIZE. 
CMP LOSAV, #200 SEE IF THE LOW LIMIT OR THE HIGH LIMIT 
pars OO CEL “LIE IN THE FIRST 4K BLOCK OF MEMORY. 
CMP » HISAV 
BHIS 
1§: MOV #200,LOLIM 
: RTS P 


$: 
$: MOV 8200,HILIM 
BR 1§ 


‘LOSEG2 IS CALLED TO 00 THE ACTUAL RELOCATION OF THE FIRST 4K MEMORY 


aa nnn 
—— er eee EE EE 


. a ee a ee Oe ee 
———— a a 


cos 
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_ TEST DOQAB-A O- 


_ DOGABR. Pll 


me me —— —— -- : _— = con _- — ——— ee ee me ee eee ee ~~ 


S | 
. & a 
Se fe we 
- £ 8 a 
wr cf 
x ae a 
Sa =F . 
v5 5 3 ait , § 
shy ne s an 
= ot (Y x t 
wys aa =< 
= * i Es 
JC is ts oe : & 
" cace — cece oo ta. 
: “ = 
ay 5 8 oe @ fo z ae Sg & 
Sow e = 2R B = Ye so Seb #8 Res 
Batch os glia, eae iol Seat be Sofas Ege: 
Wy vs x 
wi ——) > ace S ee m4 ac>a 
Sa IE = i SS3eat BanERT ISS 
ive) = 
Q T 
wu 2 
3 b 
SER se Gees GSa BE & 


cee aaa Smee! SS _— 
REPRE WN SMES! 


sachet heartache lta lactate tetas tac tae wd ot 4 4 4 tt wd ee wd wt 4 4 
QOOO9OOOBOHOOOO0090000000000000000 Lae | ow | oe | we | ow | ae | Low) oe | oe | oe | ow | oe | oe | oe ) we | 


| RRR ct A NAR ARE RARE RS 


——— 





— —— —-. =~ -<—-— _ = —  ——— —— -_—— a ~ - . - - - - 
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3860 013702 160116 Sup R1, (SP) 
1 Ol 1 137 000114 R1,gel14 
13719 1601 RI. PC 
1371 oocaoe RI 2(SP) 
4 01371 1S: PC 
3865 O01 900000 PERRFL 0 
3865 O01 SAvPC: .WORD 0 
seo 013724 oo0c000 WORD 0 
3870 013726 OOSO&7 1 COSEG4: CLR PE 
l 013736 re7 000132 000200 CMP HISAV, #200 
01 101 y BHI 1 
3873 013742 ? 177752 DEC PERRFL 
3874 013746 000207 1§ RTS pC 
3875 ; 
3876 . 
3877 . 
3878 CALLED TO ASK THE FOR BOT 
3879 : LOW UNIBUS ADDRESS LI,ITS FOR 
3880 . NG TEST. TWO LIMITS ARE T IN 
3881 FORM AT if HILIM 
55 : Tre ROUTINE DONE A OO DTT CHECK 
3885 : ae 
3886 
ae: _— 
l 904567 165004 -GC TO PRINT ROUTINE 
3889 013754 015206 
3890 013756 004767 000110 NUM ;ASSEMBLE THIS NUMBER. 
3891 013762 004767 io 
Be Ol 004767 000320 
1 10367 O00064 
3808 Ol 164756 -GO TO PRINT ROUTINE 
3895 014002 O1S2e6 ; 
2% 014004 767 OO00E J PC, : ASSEMBLE THIS NUMBER 
14010 767 O0030E y PC; 
3998 014014 767 ISR PC, vy 
330 pt Se pe ? oco032 CMP tat LOLIM -IF LOLIM IS GREATER 
3301 014032 BLE LIMERR HILIM THEN GOTO 
3903 O14034 016767 oOD0022 OOO02E 25: MOV HILIM,HISAV One LIMITS IN 
3904 O14042 016767 OOOCIE ocOdcls MOV LOLIM.LOSAV “SAVE REGISTERS. 
3905 014050 000207 RTS PC : RETURN 
33906 Ot es LIMERR: 
3907 Ol 004567 164702 JSR RS. SPRINT :G0 TO PRINT ROUTINE 
3908 O140S6 0152723 .WORD  ERRMESS “WRITE AN ERROR MESSAGE 
3303 014060 000733 BR LIMITS “AND TRY AGAIN. 
3911 014062 oo0000 AIL IM: WORD O 
3912 O14064 oocons OLIM: .WORD O 
3913 These ARE INTERMEDIATE STORGE REGISTERS: 
3614 O14066 oo00000 LosA WORD O 
2915 914070 909000 ATER, “WORD 0 
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3516 ; 
3917 
3918 : THIS ROUTINE IS CALLED 19 ASSEMBLE AN 18-BIT 
3 FROM THE TTY AND TRUNCATE IT DOWN TO 

1 : IS MADE THUS 
3922 JMP PC, INUM 
3923 “RES: .WORD O 
3924 : THE IS AND THE RESULTING 12-BIT 
3925 :T S LEFT IN RES. WHEN AND 
3359 Rte iA CIF 
3928 -IN OCTAL D gITS. CHARACTERS a ic 5D NOT 
3929 -MEET THIS SPECIFICATION IN THE I STRING 
3930 “WILL C QN FPAGR WHICH WILL BE SIGNALED BY 
3331 A? ON THE TTY FOLLOWED BY A RETRY. 
3333 g14972 005046 tNUM: CLR -(SP) ;PUT AZERO MARKER ON 
Be ite Seis a Henle io TNE 

141 1 177771 MOV 8-7,R5 REGIST 

3937 O14104 005737 1775b2 TST atk 
3938 GI4110 01274% 000076 8°). -(SP) 
3939 O14114 004767 000220 ISR Pc. tyPIT 
3940 O14! ST (SP 3+ 
3041 Ol4l22e 1 177560 1§ TST8 = @BTKS -WAIT FOR A CHARACTER 
2042 O14126 100375 is 
3043 014130 Ol 177562 MO aeTKB, -(SP) -GET IT ONTO THE 
3944 O14134 O4271S 1 BIC 8177600,(SP)  :ST 
3945 014140 Ge2716 90900177 CMP 8177, (SP) 
3946 O14144 OO0I01! 2$ 
3947 O14146 005726 TST (SP)+ 
3948 O14I50 005716 TST (SP) 
3949 
3950 
3951 014152 001763 BEG 1$ 
3325 
3954 Boland AT re Fon 
3955 CHARACTER 
3956 014154 012716 OG0134 MOV #’\, (SP) IF WAS 
3957 O14160 004767 OO01S4 JSR pc tyPIT -A PREV IOUS CHARACTER 
3958 O14164 005726 TST (SP)+ -PRINT A SLASH 
3959 014166 000755 BR 1§ 
3960 014170 004767 OO00144 25: PC TYPIT -IF THE LAST INPUT 
3961 ; CHARACTER WAS NOT 
3365 014174 022716 900015 CMP #15, (SP) Is I CR. 
3964 0614200 001350 BNE 1$ NO, BRANCH TC 1$ FOR 
3965 ‘NEXT CHARACTER. 
3966 014202 012716 oO00Ci2 MOV 12 (SP) “YES, PRINT A LF 
3967 014206 O04767 O00lc6 JSR C tyPIT 
3968 Ol42l2 005726 TST Ay 
3969 014214 005716 2S: TST (SP) i START TO ASSEMBLE 
2670 Ol42ie OOL4IS BEG ug THE NUMBER. IF THE 


IF 
2971 : STACK IS AT THE 


—- = Ce ee 


Ee Ee EE Se & * 
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QABA.F 11 BRANCH GCSSLE MOS MEMORY TEST 


ae 


csre 


-ZERO MARKER WE ARE 
; DONE, $9 TO 4S 
3974 014220 012604 MOV (SP)+.R4 CHE IF 
3375 014222 177710 Q00 #-70 Ry R i Q 
3976 014226 BGE INERR ‘VALID OCTAL DIGIT. 
3977 014230 062704 00010 ADD #10,R4 -IF NOT GOTO INERR. 
3978 014234 002417 BLT INERR 
3979 014236 005205 INC RS -ARE THERE TO DIGITS 
3980 014240 001415 BEQ INE THAN 6. 
3981 014242 004767 o0c00s4 JSR PC, THRR ‘ROTATE T 
3982 ‘LENGTH * 
3983 - OF THE IGITS PROCESSED 
3984 :T 
3985 o1424%6 oO10402 MOV RY, R2 THIS NEW DIGIT 
3986 - PAR NUMBER. 
3987 014250 000761 SR 3$ “LOOP TO GET THE REST OF 
3988 - THE NUMBER 
3989 o0142S52 005205 4g: INC RS ‘MAKE SURE THE NUMBER 
3990 O1ess 901403 ae BEQ 3s en ;HAS B BEEN RIGHT JUSTIFIED 
3345 Qluses boarts an ; 
3993 014264 004767 o00022 cs: JSR PC, ONER 
3994 014270 005726 1 (SP)}+ -AND RETURN CONTROL. 
399S 014272 000207 PC 
333% - ERROR ER F THE INUM INE. 
“RETURNS TO CALLING ROUTINE, LIMITS, TO ASK 
299g “FOR THE PARAMETER AGAIN. 
3999 014274 tNE 
4000 014274 7 164460 JSR RS. SPRINT -GO TO PRINT ROUTINE 
4001 014300 015237 : INRMES 
4002 014302 18: TST (SP)+ ; CLEAR JUNK OFF THE 
4003 014304 1376 1$ je TACK 
4004 O1 167 177560 J INUM § ; THE ROUTINE LIMITS. 
4900S 014312 l ONER: CLC sROUTINE WHICH ROTATES 
4008 14314 O06002 ROR AND TEMPS ONE 
14316 O0600- R ‘BIT 0 THE RIGHT 
4908 014320 RTS PC ; TREAT ING THEM AS A 32-BIT 
mt 014322 004767 177764 THRR: JSR PC, ONER tROUTI 7HHICH CALL 
4011 014326 004767 177760 JSR PC} ONER -ONER 3 TIMES. 
4012 O14332 004767 177754 JSR PC, ONER 
4013 014336 RTS PC 
4014 O14340 105737 177564 TYPIT: TSTB a8 TPS -TYPIT TAKES THE 
4015 014344 100375 BPL Tyert “WORD 2 BYTES UP IN 
4016 O14346 116637 OO0002 177566 2(SP), aaTPB itt STACK AND “PRINTS 
4017 014354 000207 oot THE Ty 
4018 ; HOSPAR fs” CALLED TO CHECK OUT THE pds IBILIT TY OF TURNING ON NOS 
MOS BAR Y “REGISTERS Exist 0 THER IFOME ARE ARE POUND i Fee 
4021 “ARE ENABLED OR IS SET TO TRAP TO PARERR A ROUTINE 
49ee ‘WHICH WILL NOTTEY A NBER AF he TOR ROR AND ITS LOCATION. 
we 0 nate op04s4 Pane Gs=1 TER -SET THE PARITY ERROR TRAP VECTOR. 
4026 ths 12700 172100 MOV APAREGE R RO ‘GET ReSoY tT LOOK AT THE POSSIBLE 


££ 


Ce7 


: PARITY REGISTERS PRESENT. 


._ — << me ee ee ee eee 
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BRANCH GOBBL 


DDQABA. P11 E MOS MEMORY 
4028 014366 012701 177762 
wes O1437e 012737 Olaws¥ 000004 
aoa O44 > Bool 
4032 
4033 
4034 
4035 
4036 
4037 
4038 O14410 005710 
4039 
4040 
404i O14412 005767 000102 
4042 14416 100403 
4043 014420 OO4S67 164334 
yo44 014484 015102 
as are ay 
4048 Oi44 > ieaaee 
4049 O14440 01522 
40SO O14442 po00s2 
4051 O14446 012710 00000! 
4052 1442 i 
4053 
4054 
4055 O14454 022626 
4056 14456 062700 oo0002 
4057 O14462 005201 
4058 O14464 002751 
4059 O14466 005767 o00026 
4061 O1N472 100403 
4062 O14474 OO4S67 i64260 
4063 O145S00 015131 
4064 O14502 012737 001116 OOCOO4 
4065 014510 012737 c00006 
4066 14516 000207 
4067 014520 o°od00 
4068 
4069 
4070 
4071 
4072 
4073 
4074 
4075 
4076 
4077 
4078 
4079 
4080 
4081 
4082 014522 
4083 1422 OO¥E7 164222 
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MOV #-16,R1 

MOV wMP2 | as 

me) 
s Te GISTERS OSS TED USING A Tie Tekh Re T 
;POS [eit pecl are REFERENCED AND IF A TIME out OCCURS THEY BRE NONEXISTENT 
; OR Tr REGI ISTER IS REAL. WHEN A REAL 


; R : 

an Fol Petr ei HIS CRE Bil” HE as en ne 
ipir TSE CRD) ;1F THIS INSTRUCTION TIMES OUT THEN 

; THERE 1S - =" REGISTER AT THE 


: BPERE ES IN THE TABLE HEADING HAS BEEN OUTPUT. 


a 
ISR RS, SPRINT :GO TO PRINT ROUTINE 
-WORD  MPMES 
ig HOV RO = (SP) “OUTPUT AN ENTRY INTO THAT TABLE. 
J » SER INT -GO TO PRINT ROUTINE 
SCRLF 
NOV RO) 
BR tha: 


‘TE A TIME OCCURS COME HERE. OR IF THE REGISTER WAS NOT MOS PARITY. 
MP2: CMP (SP)+, (SP)+ 
MP2s: R00 #2, RO" 


NC 
BL MP 1 *BRANCH IF NOT DONE. 
TST MPFL : SEE IF ANY MOS PARITY REGISTERS HAVE 
- BEEN FOUND. 
BMI MP3 IF NOT DON’T OUT PUT THE NO PARITY MESSAGE. 
JSR RS. SPRINT -GO TO PRINT ROUTINE 
MP3: MOV SERRTRP, 84 
MOV 82, d8b 
RTS Pc 
MPFL : 0 
- IF A PARITY ERROR IS DETECTED THEN A TRAP IS MADE THROUGH LOCATION 
- 114 TO THIS ROUTINE. HERE THE IS TOLD OF THE PARITY ERROR AND THE 
. TION e OF THE INSTRUC pi T 


OUN 
LAST INPUT TO THE PROGRAM. 
;GO TO PRINT ROUTINE 


PRO 
THe — WHICH THE USE 
JSR RS, SPRINT 


PAR 


. See os ae a® 
ial LE LO LLL LE LLL LOT 


~ Oe ee ee ee tee oe - - 
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4yos4 O14 997 .WORD  PARERR ELL THE USER A Q PARITY ERROR OCCURRED. 
4oss Ol eee 164224 JSR Re SPRINT IN 
4086 Ol 015125 . WORD PERMES : TELL wt® SER WHAT INS RCT CAUSED THE ERROR. 
4097 OID 3 004767 165200 JSR C, Oe 
4oss 01 164212 JSR RS’ SPRINT :GO TO PRINT ROUTINE 
4988 014546 01Slz22 WORD ALF 
4091] 014550 012700 o000S2 MOV sPARR3- . , RO Set HE TIME AND TREP AVECTORS SO 
wO63 O1ueee BE27OO 177772 BBO RO 
4094 O14562 010037 000114 MOV JBPARVEC 
4095 014566 005037 000116 CLR JePARVEC+2 
4096 o1NSze 012700 000176 NOV SPARRY-. , RO 
ac argia 
4098 O14608 082700 177772 Apc RO 
4099 014604 010037 O00004 MOV RO, J#ERRVEC 
4100 014619 005037 o00006 CLR JRERRVEC+E 
4101 0614614 005003 CLR R3 
4102 . 
4103 O14616 bonT: 
4104 O14S16 012301 1S: MOV (R3)+.R1 -PERFORM THE SCAN. EITHER THIS INSTRUCTION. 
4105S O14620 000776 BR “WILL TIME OUT OR THE PARITY ERROR WILL 
4106 : AGAIN OCCUR SO THAT ILL 
4107 ‘BE TRANSFERRED OUT OF THIS 1 OOP ONE LAY 
mE :OR ANOTHER. 
4110 IE THE PARITY ERROR IS AGAIN ENCOUNTERED N ED THEN THIS PROGRAM WILL 
411] OR 14. HERE THE USER 
Hite iS “GIVEN Te OF 's Thee TOUGH Ve Sen ROR FT PenOr PARITY ERROR ™ 
atte 5 Oe NOT. fF Ie ENABLED THEN THE PAR INVOLVED WITH 
4115 pari is RSD Cee ne 
4116 O14622 062703 177776 Tie AOE iR3 CONTAINS ADDRESS PLUS 2 
4117 014626 010316 ROY Ra, i, (SP PORTION Aetne THE ERRGR. 
4118 014630 062703 oD000e ADD 
4119 014634 010367 000126 MOV 
4120 O14840 767 165076 JSR ; Gon: GIVE THE THIS Ss. 
4121 O14644 7 164110 ISR -GO TO PRINT INE 
4l22 O14650 015147 . WORD “TELL THE USER THIS IS THE ADDRESS AND 
4123 O14652 OO4S67 164102 JSR -GO TO PRINT ROUTINE 
4124 O14656 O01 WORD 
4125 O14660 O10116 MOV Ri Oar -GIVE HIM THE BAD DATA. 
4126 014662 004767 165054 JSR PC’ 02A 
4128 O146E6 177572 oogcool BIT JaSRO, #1 -SEE IF MEMORY MANAGEMENT WAS USED 
4129 014674 001423 BEQ 23 ; DURING THE SCAN THROUGH MEMORY. 
4130 O14676 004767 177420 1S: JSR PC, THRR -TF IT WAS THEN ESTABLISH WHICH KIPAR 
4131 014702 004767 177414 JSR PC; THRR ‘TS INVOLVED WITH THE RELOCATION OF 
132 014706 004767 177410 JSR PC’ THRR -THIS BAD ADDRESS. 
4133 014712 004767 177404 JSR C’ THRR 
4134 014716 042703 177761 BIC #177761,R3 
4135 014722 172340 ADD #KIPARO. R3 
4136 014726 O11316 MOV (R3), (SP) 
4137 014730 164024 JSR RS SPRINT -GO TO PRINT ROUTINE 
413@ 014734 15154 -WORD  KPARM 
4139 014736 004767 165000 JSR PC, 02A 


— a ee 


<> _ _— —_— = 
— EL CO A TC 
° tlie A A ACL LL LLL LLL LE LE 


| ‘TEST TT. O-124K MEMORY EXERCISER 
DD@ABA . P BRANCH 


014742 


000403 


H GOBBLE MOS MEMORY 


164010 
164002 
000002 


163764 


000500 
000124 
015014 
177336 


Moet 27 (732) 
TEST 


dg. 


RETPR: 


SAVPER: . 


PARRY: 


is: 
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RETPR 


RS, SPRINT 
NOKT11 
RS. SPRINT 


SAVPER, R3 
CONT 


0 


RS. SPRINT 
NOTIND 


#500, SP 


PC. J #WHERE 
#1$,PC 


PC, MOSPAR 


;GO RESTART THE TEST WHICH WAS IN PROGRESS. 


;GO TO PRINT ROUTINE 
‘THE SCAN SO TELL 


iRESTART Tee, FEST wilcH Uns IN PROGRESS 


;WHEN THE ERROR OCCURRE 


; GO TO_PRINT pov ie 
THE USER 7 


LL HAT IS THE CASE 
RESTART THE SCAN WHICH WAS IN ss 
HE ERROR WAS ORIGINALLY 
-ENCOUNTERRED. » 
: RESTART THE TEST WHICH WAS I! 
“WHEN THE ORIGINAL PARITY 


‘ 


ERROR WAS FIRST 
; ENC IF RELOCATION INTO THE 
:FISRT 4K BANK IS NECESSARY. 
;GO RESET THE PARITY REGISTERS BEFORE 


——E Ss --2e eee = - 


- nied 
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QOooo0O 
be hh be hm 


Ssk | Buuzay 


QOoOoodoOO0O0000 
Ob = be be hee 
UOUIUN UU Ura) 
ye ot eet = 
ERLE RSS 


Oooo 
poe De Re 
pwn pee pee 


FE RB SSe RUSSSON EES 


2ONO OOOOCOOOOOO0000O 
oo 


Ds Bo he Pe pmo at Be be Pt mt he pe Pe Pt Dems Bene Bt ene 


MACY11 27(732) 


E MOS MEMORY TEST 
00S767 163726 


1761le 
175654 





TST 
BEQ 


JMP 
JMP 
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MMAVA sSTARTING EITHER A MEMORY MANAGED 
es :OR NON MEMORY MANAGED TEST. 

+ aA 

SPOTe 


ROUTINE USED TO SET THE TRAP VECTOR 114. 
#PARER2-. , RO 


8-6. RO 

RO vet 
deli 
PC 


{MESSAGES USED jp Bi PARITY ROUTINES. 


COMPLETE’ <15>< 12> 
(15><12>"PARITY ENABLED’ 
15><1le> 


< 
*PC=’ 
(15><12>’NO PARITY’<15>< 12> 


; THESE ARE MESSAGES USED FOR COMMUNICATIONS 
THE PROGRAM. 


MPVECT: MOV 
ADD 
ADD 
MOV 
CLR 
RTS 
NOTIND: .ASCIZ 
MPMES: .ASCII 
SCRLF: .ASCIZ 
PERMES: .ASCIZ 
NOMPAR: .ASCIZ 
“ON THE TTY BY 
(ocBaD: .ASCIZ 
KPARM: .ASCIZ 
NOKT11: .ASCIZ 
HIMESS: .ASCIZ 
LOMESS: .ASCII 
ie : ,ASCIZ 
MMME 2 -ReKtt 
ASC 
ERRMES: “Beets 
IDMESS: .ASCIZ 
LEVEN 


HAD’ 
€15><12>"KT11 ON PAR=’ 


€15><12>"KT11 OFF’ 
(15>¢12>"HIGH LIMIT?’<15><1e> 


"LOW LIMIT’ 


99? ¢ S>< (le> 
¢15><12>’USE KT11? (Y OR N)*<15> 


(12>">’ 
"NOT VALID!'<15><1le> 


(15><12>*BRANCH GOBBLE*<15><le> 


— ES aE ns _ -—— — 
tee -- _ - 
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-T LOWING IS THE CODE TAKEN DIRECTLY FROM 
‘THE a sh Neutcy INS OF TION NPAC TEER OZQKA-A. 


HARKER: i . WORD 1es2se 


01 
4 1 FIRS 
/ 
l i nove C,R3 
4231 Ol 162703 o00004 SUB 4'R3 
01 010304 MOV R3;R4 
1 INC RY 
i 3 CLR (R3) 
] ] 1$: C 
l 105513 ADCB =: (R’3) 
100402 BMI 2$ 
105214 INCB = (R4) 
rie - 4 
102401 25: BVS +4 
HALT 
Ly 
14 NCB sR) 
l Bcs INCB1 
102001 Bvc INCB1 
100401 vr one +4 
an ae a 
ooc000 STRTAD: .WORD 0 
000027 LENGTH: .WORD 1¢4LAST-FIRST/2 
016700 000130 FIRSTI: MOV HI RO 
012701 177770 MOV SLAST-. RI 
060701 ADD PC.Ri 
062701 177772 ADD #-6,R1 - 
ly edi Oe 
062703 177772 ADD #-6.R3 
010367 177736 MOV Ra, RTAOse 
16; 177736 MOV TH Re 
141 ABC: MOV =(R1),-(RO) 
005302 DEC R2 
001375 BNE ABC 
010067 177722 MOV RO. STRTAD 
77 177716 JMP astRt 
1 17771le RELO: MOV TAD, RO 
1 n00002 177704 SUB #2. STRTAD 
026767 177700 OOO04O CMP STRTAD, LO 
101414 BLOS T 
016701 177672 MOV LENGTH, R1 
011060 177776 RELO1: MOV (RO), -2(RO) 
005720 TST 0)4 
005301 DEC 
001373 BNE RELOL 
016737 177652 177570 MOV STRTAD, 38177570 
000177 177644 IMP ISTRTAD 
104400 RET: TRAP 
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Oleb6e2 36448 3646 
SPOT2 OQle7le 36515 4170 
= 177572 13118 463 14S2# 1670 1840# 2334 e775# 2783% 2784 2752s 
3742 * 4128 
= 177574 13128 
= 177576 13138 1464 1491% 2782 273! 28e3 
= 172516 13148 
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START 1818 18268 1828 2310 
012155 360 34508 
TKPTR= 000500 1296 1819 1 i185 l 2018 20231 2046 20s3 2074 
221 oa 319 2547 2704 3496 
007342 =e pad 3033 3085S 3l2l 3i6E 3193 
TRIAD O1S4l2 4°S08 42b4e 4265 4266 42674 4268 4275 4276 
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2741 3081 3i23 . 3423 3426 3433 
= 000001 13078 
= 000002 13088 2341 
= 000100 13098 
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TBITVE= 000014 12708 
TEMPO  OO04622 2277% e2279% 2295 
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014340 362 3636 3658 3727 3939 3957 3960 3967 4Ol4e 4015 
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